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1 PRODUCT CODE:  MAINDEC-11-DZDHI-C-D 
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1s DATE: DECEMBER 1976 
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é. REQUIREMENTS 

2.1 EQUIPMENT 


pop-11 FAMILY STANDARD COMPUTER WITH 4kW OF MEMORY | 
33 TELETYPE OR WEOUTVALENT 


Sr 1 is YNCHRONOUS 

DM11 MAINTENANCE CARD INSTALLED 
2.2 STORAGE 
THE PROGRAM LOADS INTO 4KW OF MEMORY 
LOADING PROCEDURE 


THE STANDART PROCEDURE FOR LOADING ABSOLUTE BINARY TAPES 
TS TO BE USED 


4. STARTING PROCEDURE 

4.1 CONTROL SWITCH SETTINGS 

4.1.1 AFTER PROGRAM 1% INITIAL PROGRAM START) 
ALL CONSOLE SWI7CHEs DOWN ’ 


4.1.2 TO MODIFY DEVICE ver Ton AND CONTROL REGISTER ADDRESSES 
AFTER PROGRAM RESTAR 


SWOO=1 

4.1.3 TO START PROGRAM AT SELECTED TEST AFTER PROGRAM RESTART 
SWO1=1 

4.2 STARTING ADDRESS 

THE STARTING ADDRESS FOR ALL TESTS IS 000200 

THE RESTART ADDRESS FOR ALL TESTS I 0002000 

THE STARTING ADDRESS TO ENTER A SELECTED TEST IS 000200 

PROGRAM AND/OR OPERATOR ACTION 

INITIAL PROGRAM START 

LOAD PROGRAM INTO MEMORY 


tu 


[OAD ADDRE 
“4 Press wo SWITCHES 
AND WILE THEN TYPE “VECTOR ADDRESS“ AND WAIT FOR AN 


INPUT FROM SHE TELETYEE KEYBOARD. 


—- — + ee ee 


ccf ror or Oe er + 


HO 1 
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| os 
| ig 4.3 (CONT'D) 
| 118 4.3.1.8 TYPE IN THE ADDRESS OF THE RECEIVER INTERRUPT VECTOR 
113 FOR THE DH11 TO BE TESTED FOLLOWED BY <CARRIAGE RETURN? 
| lel NOTE: WORDS IN ANGLE BRACKETS, I.E. <CARRIAGE RETURN? MEAN THAT 
+3 THE TELETYPE KEY WITH THE NAMED FUNCTION SHOULD BE STRUCK 
ips IF AN INCORRECT ADDRESS IS ENTERED THE PROGRAM 
225 WILL TYPE "?" AND WILL REPEAT THE SECOND MESSAGE OF 4.3.1.5 
| 126 4.3.1.7 THE PROGRAM WILL TYPE “CONTROL BEG TETER ADDRESS-” 
| ig? AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD 
125 4.3.1.8 TYPE IN THE ADDRESS OF THE SYSTEM CONTROL REGISTER OF THE 
| 10 DH11 TO BE TESTED FOLLOWED BY <CARRIAGE RETURN) 
132 IF AN INCORRECT ROQRESS _ IS TYPED, THE PROGRAM WILL TYPE 
i33 “2" OND WILL THEN REPEAT THE MESSAGE OF 4.3.1.7 
134 4.3.1.9 THE PROGRAM WILL TYPE "R™ TO INDICATE THAT IT IS 
1% ABOUT TO START TESTING, AND THEN TESTING WILL BEGIN 
14 4.3.2 PROGRAM RESTART WITH ALL SWITCHES DOWN 
i393 4.3.2.1 PERFORM 4.3.1.2 TO 4.3.1.5 
|} 346 4°3°3:2 THE PROGRAM WILL TYPE “DH11 BREAK AND HALF-DUPLEX TEST” 
| ial AND WILL THEN CONTINUE AS DESCRIBED IN 4.3.1.9 
33 4.3.3 PROGRAM RESTART WITH SWOO=1 
| = Jus 4.3.3.1 LOAD ADDRESS 000200 
| [46 4.3.3.2 SET SWOl=1 
| Ju? 4°3°3°3 PRESS START 
136 4°3°3°4 THE PROGRAM WILL PERFORM AS DESCRIBED IN 4.3.1.5 TO 4.3.1.9 
isd 4.3.4 PROGRAM RESTART WITH SWO1=1 
| 152 4.3.4.1 LOAD ADDRESS 000200 
153 4.3542 SET SWOL=1 
154 4°3°4°3 PRESS STAR 
| fS5 4°3°4°4 THE PROGRAM WILL TYPE “DH11 BREAK (AND HALF-DUPLEX TEST™ 
156 AND WILL THEN TYPE “TEST PC-" AND WILL WAIT FOR AN INPUT 
157 FROM THE TELETYPE KEYBOARD 
152 4.3.4.5 T IN THE ADDRESS OF THE TEST AT WHICH THE PROGRAM IS TO 
is9 BE STARTED FOLLOWED BY <CARRIAGE RETURN> 
160 4.3.4.6 THE PROGRAM WILL TYPE R TO INDICATE THAT IT HAS STARTED 
161 AND WILL CTART TESTING AT THE SELECTED TEST. 
162 NOTE: CARE MUST BE TAKEN WHEN THS FEATURE IS USED, SINCE 
164 THERE IS NO PROTECTION AGAINST SELECTING AN’ abOREES THAT 
165 IS IN THE MIDDLE OF A TEST 
167 NOTE: IF IT IS DESIRED TO LOOP ON THE TEST THAT IS SELECTED 
1g SET SW14=1 BEFORE ente orNG THE TEST ADDRESS 
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OPERATING PROCEDURE 

5.1 OPERATIONAL SWITCH SETTINGS 


ERROR 
1, CURE WT TEST 
1 $s 
i, INHIBIT ITERATIONS 
1 


O=1, coc \. A — TEST ON ERR 
SWOS=1, ABLE PARAMETER TN CURRENT TEST 


=l, eat PROG Be a E EST 

fal) BURL PRS Sy iat esran 
S.2 SUBROUTINE ABSTRACTS 

5.2.1 TRAPCATCHER (LOCATIONS 000000-000776) 


He Ss ROUTINE i? WER Me of O86 ae ongare ee al 


WITH THE FOLLOWING SEQUENC 


ONO ~—_ * Of£OT 
“J . 
o fu: 


IF AN UNEXPECTED INTERRUPT OR TRAP OCCURS, THE PROGRAM 

WIL HALT WITH THE PC 2 GREATER THAN THE ADDRESS TO 
WHICH THE PROGRAM THE PROCESSOR STACK MAY 

BE EXAMINED TO DETERMINE WHERE THE PROGRAM WAS WHEN THE 

TRAP OR INTERRUPT OCCURED. 


6.2.2 START (PROGRAM INITIALIZATION) 
THIS ROUTINE INITIALIZES ALL PROGRAM FLAGS AND COUNTERS, 


AND CONTROL Ree ToTER RBORESSES: OF Ate DALI a 


5.2.3 BEGIN (PROGRAM START AND RESTART) 


HIS ROUTINE IS DIATLY BF TER “START” 
ang ERC yee B_ PROGRAM Pas pes BEEN COMPLE ED. 

NE BOUTIN "Ets UP T STACK Kan STATUS WORD 
cto THEN T ERS CONTROL f rf sor Test 8 WHICH 
TESTING WILL BEGIN. IF SWOl=0 WHEN THIS WP otaits IS ENTERD 
TESTING WILL STwRT AT T1 (TEST 1). IF SWOl=1 WHE 

HIS ROUTINE IS ENTERED, TESTING WILL START AT THE PC 
EN ERED FROM THE TELETYPE KEYBOARD. 
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§.2.4 


$.2.5 


5.2.6 






JOl 


EOP (END OF PASS) 


THIS ROUTINE IS ENTERED ONCE PER PASS AFTER . TESTS 
HAVE BEEN COMPLETED. THIS ROUTINE TYPES THE MAINDEC 
IDENT IF 2C8z TON CODE _OF is PROGRAM, CLEARS ERROR FLAGS 
ates ie TES haga A TE THe PROGRAM Ha ee 
ACT11 OR DOP ROUTINE CHECKS FOR RETURN T 


TH Sed oR, non ToRs IF TRANSFERS TO Rect uNoer 


SCOPER (SCOPE LOOP AND ITERATION HANDLER) 
i ec is oe POAT ae etait a. Ve IS _—— 


a iE "Bulb, aE ae fare eR Io THE NEXT TEST 


B) iF polls 1, tue TRANSFER TO THE NEXT TEST 
“AETER cL ROUEARING TERROR 


C) iF Sulie A Me be Rout Ne Th ea oN THE CURRENT TEST 


IF NONE OF THE ABOVE IS T teat ees Pore THIS AL 
TO THE COUNT OF TEST ITERATI re VALUE 
TQ THE NUMBER OF Ffeast tere te SHOULD BE 

IF THESE NUMBERS ARE EQUAL THE ROUTINE aru TRANSFER 


TO THE NEXT TEST IN SEQUE THE THE NUMBERS ARE NOT 
EQUAL, THE TEST CURRENTLY IN PROGRESS WILL BE REPEATED. 


SCOPIR (FREEZE ON CURRENT DATA) 
THE CALL TO THIS ROUTINE FOLLOWS IMMEDIATLY AFTER THE 
THE CALL TO THE ERROR HANDLER IN THOSE TESTS THAT HAVE 
ARIABLE PARAMET THIS ROUTINE IS ALWAYS ENTERED IN 
THOSE TESTS WHETHER OR NOT AN ERROR OCCURS. 
IF SWO9=1, THE ROUTINE WILL TRANSFER CONTROL BACK TO THE 
TEST AT A’POINT WHICH WILL ALLOW REPEATING THE FUNCTION 
UNDER TEST CONTINUOUSLY WITH THE SAME DATA. IF THIS 
OPTION IS SELECTED THE ROUTINE “SCOPER” IS NEVER ENTERED 
AND ITERATION COUNTS WILL NOT BE UPDATED. 
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§.2.7 


$.2.8 













KO1 


ERRORS (ERROR HANDLER) 


uit ae IS ENTERED UPON ERROR DETECTION Pace 
Reig SWITCHES DOWN, THE ROUTINE PROCEDES AS FOLLOWS: 
INST LED THE ERROR HANDLER 


ns gcgesseD THRU THE THE STACK, ft. THEN THe EMT INSTRUCTION 
INSTRUCT S 
WONGHELEES SID ile Luce dn 

IF THE TEST THAT FAILED DID NOT FAIL PREVIOUSLY 
DURING OR REPORT IS MADE 
IF THE Test THAT’ FAILED FAILED MOR THAT ONCE DURING 
THE CURRENT PAS Y THE DATA RELATING TO THE FAILUER 
IS TYPED. IF SWi3=1, NO ERROR TYPEOUT IS 

THE ROUTINE NOW N NOL CHECKS FOR HALT 
THE ERROR ROUTINE IN RO. IF 


_ 


C 


~~ 


D 


Baan 
p 
ages 
Or 


THE ROU 
To THE TEST IN PROGRESS. IF SW10=1, THE PoUTINE WILL 
ABORT THE CURRENT TEST, AND TRANSFER TO THE NEXT 

fest IN SEQUENCE, THRU THE ROUTINE “SCOPER™. 


TRPSRV (TRAP DECODE AND DISPATCH) 


THIS ROUTINE DECODES THE 8 LSB OF THE TRAP INSTRUCTION 
THAT CAUSED TH ae INTERRUPT, AND be CONTROL 
TO THE ROUTINE THRU THE TABLE “TRPTAB™ USING THE @ LSB 
OF THE TRAP INSTRUCTION FS AN OFFSET TO THE POINTER TO 
THE ROUTINE TO BE ENTERED 


LO1 
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29% 
es” 5.3 PROGRAM AND OR OPERATOR ACTION 
233 5.3.1 PROGRAM START WITH ALL SWITCHES DOWN 

301 5.3.1.1 REFER 79 SECTIONS 4.3.1 AND 4.3.2 FOR INITIAL PROGRAM 
303 
304 5.3.1.2 AFTER “R" HAS BEEN TYPED BY THE PROGRAM, TEST EXECUTION 
305 WILL BEGIN. EACH TEST WILL BE REPEATED A SELECTED NUMBER 
206 OF TTERA ERATIONS (SEE LISTING FOR EXACT NUMBER FOR EACH TEST) 
307 AND T HE PROGRAM WILL PROCEED TO THE NEXT TEST. 
3093 5.3.1.3 WHEN ALL ITERATIONS HAVE BEEN COMPLETED, THE PROGRAM 
310 WILL TYPE “DZDHI™ AND THEN RESTART TESTING AT TEST 1 
11 SLOEATION Tl IN THE PROGRAM). 
313 5.3.1.4 IF AN ERROR OCCURS, THE PROGRAM WILL TYPE @N APPROPRIATE 
14 ERROR MESSAGE, AND THEN CONTINUE THE TEST IN PROGRESS. 
sit 5.3.2 PROGRAM START WITH SWOO=1 
zig THE PROGRAM WILL PERFORM AS DESCRIBED IN 4.3.1 AND 5.3.1 
320 5.3.3 PROGRAM START WITH SWOi=1 
22 5.3.3.1 REFER TO SECTION 4.3.4 FOR INITIAL PROGRAM BEHAVIOR 
334 5.3.3.2 TEST EXECUTION WILL START AT THE ADDRESS SPECIFIED 
32s AND WILL CONTINUE AS DESCRIBED IN 5.3.1.2 
337 5.3.3.3 AFTER “DZDHI” HAS BEEN TYPED, THE PROGRAM WILL 
32 RESUME TESTING AT TEST 1 
3x0 5.3.4 PROGRAM OPERATION WITH SWIS=1 
33¢ SAME AS 5.3.1, EXCEPT THAT IN THE CASE OF AN ERROR, 
333 THE PROGRAM WILL HALT AFTER THE ERROR TYPEOUT, AND 
334 THE PC+2 OF THE cat TO THE ERROR ROUTINE WILL BE 
235 DISPLAYED IN RO. 
327 5.3.5 PROGRAM OPERATION WITH SW13=1 
$33 SAME AS 5.3.1 EXCEPT THAT NO ERROR TYPEOUTS WILL OCCUR 
341 5.3.6 PROGRAM OPERATION WITH SW11=1 
343 SAME AS 5.3.1 EXCEPT THAT EACH TEST WILL BE REPEATED ONCE 
ze on 
En 5.2.7 PROGRAM OPERATION WITH SW10=1 
348 SAME AS 5.3.1. EXCEPT THAT IN THE CASE OF AN ERROR 
349 THE CURRENT i WILL BE ABORTED, AND THE PROGRAM 


350 WILL PROCEED TO THE NEXT TEST IN’ SEQUENCE. 








DZDHI. MACY11 27( 1006) 
29-SEP-76 14 


DZOHIC.P11 


29-SEP-75 
:42 


MO1 


14:44 PAGE 10 
S. (CONT'D) 
5.3.8 PROGRAM OPERATION WITH SW14=1, OR SWO9=1 


6.1.1 


6.2 
6.2.1 


6.2.2 


6.2.3 


THESE FUNCTIONS ARE NORMALLY USED FOR TROUBLE SHOOTING. 
SEE SECTION 6.3 FOR THEIR USE. 


ERRORS 
ERROR HALTS 


THE ERROR MESSAGE FORMAT FOR ALL ERROR TYPEOUTS 
IS AS FOLLOWS 


PC+2 MESSAGE 
HEADER (IF APPLICABLE) 
DATA (IF APPLICABLE) 


WHERE 

PC+e IS THE aneerTt OF THE CALL TO THE ERROR HANDLER + @ 
MESSAGE IS AN ASCII MESSAGE DESCRISING (BRIEFLY) THE FAILURE 
HEADER IS A DESCRIPTION OF THE DATA_TO FOLLOW 

DATA IS OCTAL INF et yeird TO THE CAUSE OF THE FAILURE 
IF THE SAME ERROR N TEST ON THE SAME 

PASS, vee ve ais “aSeoc TA TED ETH Th mer ERROR, ONLY 

DATA’ IS EEDING E 


IF NO DATA IS ASSOCIATED WITH THE ERROR 
THE COMPLETE ERROR MESSAGE IS TYPED. 


ERROR DESCRIPTIONS 

SEE LISTING FOR DETAILS OF ERRORS 
ERROR RECOVERY 

SW1S5=0 


IF THE PROGRAM IS RUN WITH SW1S5=0, NO OPERATOT ACTION IS 
“Tt TO CONTINUE TESTING 


DE EOS HATS lsc" HUNESTE™ 


ONSOLE CONTINUE SWIT 
ILLEGAL INTERRUPTS 


IF AN INTERRUPT OCCURS TO A VECTOR ADDRESS N 
SELECTED D DURING PROGRAM INITIALIZATION, THE PROGRAM WILL 
N THE TRAPCATCHER, THE ADDRESS AT WHICH 
HAL TS GREATER THAN THE AD: 
TO WHICH THE INTERRUPT OCCURED. THE PROGRAM MUST BE 
RESTARTED AT 200 TO RECOVER FROM THIS ERROR. 


SEG 9009 





Ho 
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aa) 6.3 SCOPE LOOPING 
403 6.3.1 TO SCOPE oN A SPECIFIC. TEST, et Sui4=1 1 AND Sul 3=1 = 
i Bi st, REE AACE EROS °C WAVES oP res 
43 6.3.2 TO SCOPE ON A SPECIFIC VALUE OF A PARAMETER WITHIN 
414 A TEST, SET SWO9=1 TO FREEZE THE DATA 
415 , (SEE LISTING FOR THOSE TESTS THAT INCORPORATE THIS FEATURE) 
i b. (CONT'D) 
133 6.3.3 PROGRAM START TO SCOPE LOOP ON SELECTED TEST 
Hel | PERFORM SECTION 4.3.4 WITH SWi4=1 
| te3 | 7. RESTRICTIONS 
is . 7.1 STARTING 
n. 14 THE DH11 TEST CARD MUST BE INSTALLED 
ae 7.2 RUNNING 
| at NONE 
ee ce MISCELLANEOUS 
435 4 8.1 EXECUTION TIME 
rei NPE of Ape Pass OF THE E PROGRAM (END OF 
43 ae IVEN FoR VARIOUS PROCESS ORE IN Phe = LE BELOW 
441 TIME 
4e | PROCESSOR 
| — ¢ PDP-11/05, 10 
— - POP-11720 
448 POP-11/40 
445 


PDP-11745 


=item, Ce De 7 . . > . . 1 
° i ~~. . — 2 , 
_ = 2 -. a - <cd o™ -. ~~ . 4 ~ > - . = my y= « {- -. 


. B02 
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PROGRAM DESCRIPTION 


we 
| = THE FIRST GROUP OF TESTS VERIFIES THAT ONLY ONE BREAK 
MEE CHARACTER IS RECEI D ON A GIVEN LINE, EVEN THOUGH BREAK 
| 4&F IS ASSRETED FOR THAT LINE FOR 400 (OCTAL) CHARACTER TIMES. 
_ 58 T = atl : IVI TEST LOOP FOR EAcH LINE. 
45S T BEGINS BY FLUSING EACH URRT BY TRANSMITTING 
ToMuL (0) CHARACTERS, THE BREAK BIT IS THEN SET 
| SEI cOR 1s He LINE T0 ais MISSION OF THE BINARY COUNT 
| + that RN 1S STRAT S110 15 THEN CHECKED TO VERIF 
| we THAT f tes A BR A BREAK Ef CHARACTER. 
#8 - SECOND GROUP OF TESTS VERIETES THAT NO_CHARACTE 
| é 
ee: 1s SET FOR THE LI TESTED. ae 15 Bi EE 
465 EST LOOP FOR EACH LINE TO BE TESTED NARY COUNT 
| #70 TERN IS THEN TRANSMITTED ON. THE L Ne'T8. BE TESTED. 
| #24 N TERS HAVE BEEN TRANSIT FFeD, THE CHARACTER 
| & AVAILABLE FLAG IS TESTED TO DETERMINE IF ANY CHARACTERS HAVE 
eS. : 
47 10. LISTING 
i 43 
s7E 1 
475 
426 DHL BREAK AND HALF DUPLEX TEST 
48: :COPYRIGHT 1972, 1976, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754 
463 ;STARTING PROCEDURE 
484 ; LOAD BRoGRAR 
4 iBeeee STeRT 
487 : WILL TYPE DH11 BREAK Bn a0. HALF DUPLEX TEST 
355 TOPE IN THE ADRESS OF TH NTERRUPT VECTOR 
+50 }FOR THE DHT TESTED. [ass By cc BRRIAGE RETURN) 
“5! :PROGRAM Wd tt Tyee CONTROL Re 
452 :TYPE_IN fe AOORESS OF TH HE SYSTEM CONTROL REGISTER 
452 iFOR THE HII BY «CARRIAGE RETURN? 
-5- PROGRAM WILL TYPE “RTO ENDICATE. THAT TESTING HAS STARTED 
-3E :AT THE ENO OF A PASS, PROGRAM WILL TYPE " DZDHI ™ 
4% SAND THEN RESUM TESTING 
s3e : 
pe ;SWITCH REGISTER OPTIONS 
ES: SW15=100000 ;21,HALT ON ERROR 
E56 Sw14=40000 :=1;LOOP_ON CURRENT TEST 
5o3 el 320000 ;=1, INHIBIT ERROR TYPEOUT 
504 Sul = 19000 
50s Swli=4 51, INHIBIT. ITERATIONS 
50 €110=2000 :S1;ESCAPE TO NEXT TEST ON ERROR 
€07 £..09= 1000 :21;LOOP WITH CURRENT DATA 
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SWOB=400 
oo 
l=é ; RESTART PROGRAM ae SELECTED TEST 


SWOO=} ;RESELECT VECTOR AND CONTROL REGISTER 
;ADURESS AFTER PROGRAM RESTART 
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DIOMIC.P11 © 2S-SEP-7e 14:42 
17 
| $18 
518 
| $e 
| 35 000004 
, 536 900095 
| 6827 005006 
/ 3g 000007 
523 
| =. §350 
| §3) 
_  §32 177570 
$33 177570 
Be AT ogue 
_ Se 
| §37 
sag 
Fug SSes3 
41 515046 
= BES 
2u5 33 
Eee 
<r 
4? 
eer 100000 
us 049000 
E50 020000 
51 019000 
ze sais 
eos 901009 
ct 090409 
eee 060200 
4 900100 
zee 900040 
£=9 009520 
560 900010 
gs 000904 
900002 
ee 90000! 
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;REGISTER DEFINITIONS 


RO=%0 ;GENERAL REGISTER 
U2 Set te 
ass75 ; GENERAL Reet et S 
R4=%4 ;GENERAL REGISTER 
Ro=45 i GENERAL REGISTER 
SP=%6 PROCESSOR STACK POINTER 
PC=%7 PROGRAM C COUNTER 


;LOCATION EQUIVALENCIES 


SWR=177570 ;CONSOLE SWITCH REGISTER 
rHGHTS=177570 :POP-11745 erate REGISTER 


PS=177776 PROCESSOR STATUS 

5 FAGK=ENBCOD+200: START OF PROCESSOR STACK 
; INSTRUCTION DEFINITIONS 

ees. | Mew tiie 
POPRO=12600 + fy FROM STACK 


pipeae | iecprent siaee TMG 
-EQUIV EMT,HLT ;BASIC BEF INITION OF ERROR CALL 





E0e 
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ee : TRAPCATCAER FOR ILLEGAL INTERRUPTS 
3 {2 : UNEXPECTED TRAP 1 THIS LOCATION 
| : RETDDE ES Ph 1) WaT BBar io 
| s LT : EXAMINE STACK ae a ESE 
x, © 
BF BSA Hho Pe 
fe ‘ i UNEX T p R ey Hts LOCATION 
253 aopei8 42 hie sed TED TRAP TO THIS LOCATION 
|  §75 oo00e2 HALT : EXAMINE fois TO 
25 SaExe +2 Bathe tec Pe 19 Bit LOCATION 
| HALT 
78 000030 {2 ia TED Tea 19 Hs ait LOCATION 
| 590 Bo9835 + Penite 1B Trae 10 Tors LOCATION 
561 000036 HALT PNRM NE TACK I 
| Pee popo4g +2 UNEXPECTED TRAP TO THIS LOCATION 
HALT TEXAMINE § mck TO FIND CAUSE 
| 54 90004 +2 UNEXPECTED TRAP TO THIS LOCATION 
S85 O0004¢ HALT EXAMINE STACK TO F 
| & 3 o000sc +2 : UNEXPECTED TRAP TO THIS LOCATION 
|  §87 900052 HALT :EXAMINE STACK TO FIND 
See 900054 +2 : UNEXPECTED TRAP TO THIS LOCATION 
| §—8S 900056 HALT *EXAMINE STACK T 
590 000060 +2 UNEXPECTED TRAP 19 THIS LOCATION 
&o1 900062 HLT : EXAMINE STACK T TO FIND CAUSE 
592 00064 42 :UNEXPECTED TRAP TO THIS LOCATION 
593 900066 HALT : EXAMINE STACK T TO FIND CAUSE 
| §4 990070 +2 :UNEXPECTED TRAP 19 THIS LOCATION 
| §95 900072 HALT EXAMINE STACK TO F 
| §@6 900074 +2 : UNE XPEC TED TRAe 3 THIS LOCATION 
_  §&97 900076 HALT EXAMINE STACK T 
59 900100 +2 ; UNEXPEC TED Kap. 19. THIS LOC LOCATION 
Pan eared — brett ED TRAP To T wor ATION 
+ 
| oP Bee ides Brite a sorte 
e0e 900119 000112 #2 TED Thee 10 Ti mors LOCATION 
ae 
| 604 ttt BOOTIE fe : u rg aaa re: LEE TION 
EOP 555138 Bootes +2 rEXBMINE, 1 TRAP 19 THIS LOCATION 
607 O00le2 900000 HALT ‘EXAMINE STACK T 
608 pocies 000126 +2 ‘UNEXPECTED TRAP 10 THIS LOCATION 
£09 126 900000 HALT EXAMINE S ACK TO FIND CAUSE 
610 000130 000132 +2 : UNE XPEC TED TRAP 19 THIS LOCATION 
611 000132 900000 HALT EXAMINE STACK TO F 
fle 000134 000136 +2 i UNEXPECTED 1 TRAP TO THIS LOCATION 
613 9051 36 HALT ‘EXAMINE STACK TO FIND CAUSE 
£14 1 Boot ae +e : UNEXPECTED TRAP TO THIS LOCATION 
615 o0014e2 90005 HALT ‘EXAMINE STACK TO FIND C 
616 00144 146 +e UNEXPECTED TRAP 19 THIS LOCATION 
617 000146 oo00N0 HALT ‘EXAMINE STACK TO F 
£16 OO01SO O00ise +e UNEXPECTED TRAP TO THIS LOCATION 
£13 SOdls2 O00000 HALT SEXAMINE STACK TO FIND CAUSE 


SEUSS Rae: MUTE hari ae 


FO0e 


— eee 
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620 OO01S4 900156 42 i UNEXPECTED TRAP 10, THIS ab ggArion 
621 009156 HALT XENINE S TACK K 10 FIND © tiie 
| JOO . 
bss Bontee ages BS ec eto FING ae: 
| Se ponies ppoaeG bart Een TED ee TO THIS L "olen 
9091 +2 UNE Ep Tae 10 TO THIS LOCATION 
Pgs Boat se reared HALT :EXAMINE STACK TO FI 
628 900174 176 +2 :UNEXPECTED TRAP TO THIS LOCATION 
629 000176 Spanos HALT -EXAMINE STACK TO FI 
630 900200' ondede +2 :UNEXPECTED TRAP TO THIS LOCATION 
631 dodede pp9956 HALT sEXBMINE STACK TO FIND CAUSE 
£22 .+2 ; UNE CTED TRAP TO THIS LOCATION 
633 900206 900000 HALT j EXAMINE STACK T 
634 000219 O00e12 +2 : UNE XP ETED Tee 79 THIS LOCATION 
| 635 000212 900000 HALT enn STACK T TO F 
62 000214 Oo0el16 42 : UNE XPE CTED TRAP 9 TH THIS LOCATION 
| 637 opel popg09 HALT !EXAMINE STACK TO FIND CAUSE 
£28 22 +2 :UNEXPECTED TRAP TO Mors LOCATION 
633 000222 900000 HALT : EXAMINE TACK TO FIND CAUSE 
640 000224 Od00226 +2 :UNEXPECTED TRAP TO THIS LOCATION 
641 000226 909000 HALT sEXAMINE STACK TO 
&42 000230 900232 +2 ‘UNEXPECTED TRAP TO THIS LOCATION 
643 000232 900000 HALT :EXAMINE STACK TO 
£44 .000234 000236 42 :UNEXPECTED TRAP TO THIS LOCATION 
é45 000236 900000 HALT *EXAMINE STACK TO 
646 000240 O00242 +2 *UNEXPECTED TRAP TO THIS LOCATION 
647 000242 900000 HALT “EXAMINE STACK TO FIND CAUSE 
648 000244 dode4E 40 : UNE XPECT! TRAP TO THIS LOCATION 
648 900246 o00000 HALT sEXAMINE STACK 
650 000250 9o002S2 +2 : UNEXPECTED Chop TO THIS LOCATION 
ces Doose4 DooSeE < ‘ENEXPECT ED TRAP To THIS LOCATION 
+ 
e25 Booser posses Gar tNENINE STACK TOF 
p54 000260 o00262 wt? fay a ag nhh TO THIS LOCATION 
cee Boosed posses eS EE EEE TED TRAP TO THIS LOEATION 
Eee wai 7 ; a sEXARINE | BF thee TO THIS LOCATION 
Fes Sooses Bosse BRET t EMTAE STACK TO FIND. CAUSE 
G60 000274 000276 +2 {UNEXPECTED TRAP TO THIS LOCATION 
eee BD 5508 Bpasos — i PE XPEETED TRAP TO THIS LOCATION 
663 900302 900000 HALT :EXAMINE STACK TO FI 
664 000204 000206 +2 ; UNEXPECTED TRAP TO THIS LOCATION 
665 000206 900000 HALT :EXAMINE STACK TO FIND CAUSE 
£66 000310 o0031e 42 ‘UNEXPECTED TRAP TO THIS LOCATION 
£67 990318 pons HALT :EXAMINE STACK TO FI 
668 000314 1 +2 ‘UNEXPECTED TRAP TO THIS LOCATION 
fe Bae Be s RENEE one 1p hast SEaTzon 
+ 
671 eine ane HALT s EXAMINE 3 TACK 0 FI 
be 000324 000326 fe Ree TED TRAP TO, THIS § LOCATION 
674 ve 358 3; ane eee 4D Bann Tack TKap Of! MOTs LOCATION 
675 0900332 c00000 HALT :EXAMINE STACK TO FIND CAUSE 
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GO0e 


;UNEXPECTED TRAP TO THIS LOCATION 
;EXAMINE STACK TO_F CAU 
;UNEXPECTED TRAP TO THIS LOCATION 


; EXAM TACK TO_FIND CAUSE 
iGhexPec TED TRAP TO THIS LOCATION 


; UNE oo TQ THIS LOCATION 
EXAMINE STACK T 
Borie TE a TQ_THIS LOCATION 


THIS LOCATION 


rg as THIS LOCATION 


XAMINE STACK T 


BSS eh TRAP ero. TTRIS OEATION 


ED TRAP TQ_THIS LOCATION 
iPr Ane STACK TO_FINO CAUSE 
RAP TO me LOCATION 


ty ea a ae 


sEXAMINE STACK TO FI 
:UNEXPECTED TRAP TO THIS LOCATION 
; EXAMINE ota te TO_FIND CAUSE 

TRAP TO THIS LOCATION 
t EXAMINE " ACK TO FIND CAUSE 
; UNEXPECTED sg TQ_THIS LOCATION 
: EXAMINE ahs Vied 
; UNE ig oF THIS LOCATION 
Dianite. S1Ack 


FIND 
Pr PRIS LOCATION 
EXAMINE STACK TO 


; UNEXPECT on TQ_THIS LOCATION 
EXAMINE STACK T 

: UNEXPECTED TRAP TO THIS LOCATION 
;EXAMINE STACK TO FIND CAUSE 

; UNEXPECTED hg ” THIS LOCATION 


; EXAM 
RePEc TED TRAP 10 Ls heen tOn 


NO CAUSE 
; UNEXPEL TRAP TO THIS LOCATION 
; EXAMINE STACK TO FIND CAUSE 
XPECTED TRAP ” THIS LOCATION 
* EXAMINE STACK TOF 
; UNEXPECT ep Mg TO THIS LOCATION 
EXAMINE STACK TO F C 
; UNEXPECTED TRAP TQ THIS LOCATION 
EXAMINE STACK TO FIND CAU 
TRAP TO THIS LOCATION 


UNEXPECTED TR 

;EXAMINE STACK TO FIND CAUSE 

: UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 


oO 





—_—_ 
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| 732 000514 o00s16 +2 ;UNEXPECTED TRAP TO THIS LOCATION 
| 733 000516 900000 HALT :EXAMINE STACK TO FIND CAU 
734 +2 i UNEXPECTED TRAP TO THIS LOCATION 
| 735 2 HALT sEXAMINE STACK TO 
736 +2 :UNEXPECTED TRAP TO THIS LOCATION 
737 000S26 HALT sEXAMINE STACK TO F 
738 900530 + . : UNEXPEC ED TRAP TO, THIS LOCATION 
538 popes + 1 ENEXPE 12 TO Hors LOCATION 
741 O00S36 HALT sEXAMINE STACK T 
742 900540 +2 : UNEXPECTED TRAP 19 THIS LOCATION 
743 000542 000000 HALT SEXAMINE STACK TO F 
| 744 000544 O00S46 +2 :UNEXPECTED TRAP TO THIS LOCATION 
745 900546 900000 HALT tEVGMINE STACK TO FIND CAUSE 
746 oo0sse2 +2 ‘UNEXPECTED TRAP 19 THIS LOCATION 
74? S2 000000 HALT : EXAMINE repheK age TO FIND 
748 900554 O00SSE +2 :UNEXPECTED TRAP TO THIS LOCATION 
748 900556 000000 HALT tEXAMINE STACK TO FIND CAUSE 
| 750 000560 900562 +2 :UNEXPECTED TRAP TO THIS LOCATION 
751 900562 900000 HALT :EXAMINE STACK TO FIND CAUSE 
752 O00564 O00SEE +2 ;UNEXPECTED TRAP TO THIS LOCATION 
753 000566 9000000 HALT :EXAMINE STACK TO FIND CAUSE 
754 900570 9000572 +2 : UNEXPECTED TRAP TO THIS LOCATION 
755 000572 o00000 HALT EXAMINE STACK TO 
| 756 000574 000576 +2 : UNEXPECTED TRAP TO THIS LOCATION 
| 757 000576 900000 HALT :EXAMINE STACK T SE 
758 O00600 on0602 +2 : UNEXPECTED TRAP TQ THIS LOCATION 
753 000602 o00000 HALT *EXAMINE STACK T 
760 OO0604 O0060E 4D :UNEXPECTED TRAP 19 THIS LOCATION 
761 O00606 900009 HALT *EXAMINE STACK TO FIND CAUSE 
762 000610 O00b12 +2 ‘UNEXPECTED TRAP TO THIS LOCATION 
763 000612 op0000 HALT : EXAMINE reek TO FIND CAUSE 
| 764 OO00614 OO06iE +2 ?UNEXPECTED TRAP TO THIS LOCATION 
000616 900000 HALT “EXAMINE STACK TO FIND C 
765 +2 : UNEXPECTED TRAP TO THIS LOCATION 
HALT > EXAM INE STACK T 
+2 UNEXPECTED TRAP rg THIS LOCATION 
| HALT *EXAMINE STACK TO FIND CAUSE 
+2 :UNEXPECTED TRAP TO THIS LOCATION 
1 900632 o00000 HALT : EXAMINE reqnek TO FIND CAUSE 
772 000636 +2 {UNEXPECTED TRAP TO THIS LOCATION 
773 000000 HALT ;EXAMINE STACK TO 
774 000640 o00642 +2 :UNEXPECTED TRAP TO THIS LOCATION 
775 O00642e 900000 HALT ‘EXAMINE STACK TO FIND C 
776 OODE44 OOD646 +2 {UNEXPECTED TRAP TO THIS LOCATION 
777 000646 900000 HALT *EXAMINE STACK 
778 000650 900652 40 ‘UNEXPECTED TRAP TO THIS LOCATION 
773 o0065e 900000 HALT :EXAMINE STACK TO FIND CAUSE 
780 000654 Od0065¢ +2 :UNEXPECTED TRAP TO THIS LOCATION 
781 OO0656 900000 HALT “EXAMINE STACK TO FIND CAU 
782 O00660 O00662 +2 : UNEXPECTED The TO THIS LOCATION 
783 000662 op0000 HALT :EXAMINE STACK T 
784 000664 OO0GEE +2 ; UNEXPECTED TRAP 79, THIS LOCATION 
785 000666 o00000 HALT ; EXAMINE STACK T 


786 000670 7 .+2 ; TED D TRAP. T THIS gh 
787 000672 ita HALT ier NE STACK TO omy CAUSE 
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9000676 .42 ; UNEXPECTED TRAP TO THIS LOCATION 
789 900000 HALT sEXANINE STACK T 


0 FIND CAUSE 
Booree | Bp005 pact Bivathe Stack Yo Puno gabee 


000706 +2 TRAP 9 THIS LOCATION 


HALT EXAM TACK TO 
nae 42 BU HL TO TO SSE ION 
g59006 HALT EXAMINE STACK TO FIND 

71 +0 [UNEXPECTED TRAP TO THIS LOCATION 
900090 HALT : EXAMINE TACK TO FIND CAUSE 
000722 +0 : UNE XPEC RAP TO THIS LOCATION 
000006 HALT ‘EXAMINE STACK TO FIND CAUSE 
000726 +2 :UNEXPECTED TRAP 19 THIS LOCATION 
EXAMINE STACK TO FIND 
? : UNEXPECTED TRAP 9, THIS LOC LOCATION 
HALT ‘EXAMINE STACK T 


HRSA alu etze™™™ 
000742 -%e TED TRAP TO THIS LOCATION 


000000 HALT tPNAMTNE TET ACK TO_ FINO CAUSE 


Piste asian et urine 


ae 


000746 +2 UNEXPECTED TRAP TO THIS LOCATION 
009009 HALT tEXAMINE STACK TO FI 

810 90075 +2 Be TED TRAP TO THIS LOCATION 
Sil HALT AINE STACK TO FIND CAUSE 
gle 000756 #2 ine : TRAP 19 THIS LOCATION 
Et Bpoeee “ Boni bi ACK ap TO WIaTS LOSATION 
eis 900009 HALT ONAN TRE STACK TO FIND CAUSE 
B16 OO07E4 00766 +2 : UNEXPECTED TRAP TO THIS LOCATION 
817 000766 900000 HALT ‘EXAMINE STACK TO CAU 
€1e 000770 900772 +2 : UNEXPECTED TRAP TO THIS LOCATION 
618 900772 900000 HALT *EXAMINE STACK SE 
829 900774 9000776 +2 : UNEXPECTED TKape TO Mn LOCATION 
82; 0900776 oco0000 HALT ‘EXAMINE STACK TO FIND CAUSE 
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;STANDARD INTERRUPT VECTORS 


-=24 
PFATL ;POWER FAIL HANDLER 
34C :SERVICE AT LEVEL 7 
ERRORS :E HANDLER 
340 ;SERVICE AT LEVEL 
TRPSRV ;GENERAL HANDLER oiseaTce SERVICE 
200 340 SERVICE AT LEVEL 7 
JMP START ;GO0 TO START OF PROGRAM 
jae FOR TRAP SUBROUTINE CALLS 
s POINTERS (70 ayeRoury INES CAN BE FOUND STARTING 
ATION 
SCOPE=TRAP+Y 3 SCOPE LOOP + ITERATION HANDLER 
TYPESTRAP+Y ; TELETYPE OUTPUT R 
OCTASC=TRAP+Y  OCTAL TO ASCIT CONVERSION 
NSTR=TRAP+Y Phe CI! nan NG 
NSTER=TRAP+Y RING T ERROR 
PARAM=TRAP+Y CONVERT gins TO OCTAL, CHECK LIMITS 
SAVOSP=TRAP+Y : SAVE ge 
RESOS=TRAP+Y RESTORE RO- ee” 
46 SCOPE 1=TRAP+Y ;CHECK FOR FREEZE ON CURRENT DATA 
LOGICAL 
=Se 


40000 


—— eee 


KOe 


#9 
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e54 001000 .21000 

Sse ; PROGRAM M INITIAL IZATION 

EE ;LOCK OU UP PROCE SOR STACK 

gss -SET UP POWER FAIL VECTO 

860 :CLEAR PROGRAM FLAGS AND COUNTS 

gel : TYPE TITLE MESSAGE 

863 O01000 012767 OO0034O 176770 START: MOV #340, PS sLOCK OUT INTERRUPTS 

364 991006 012708 013540 MOV #eTARK. SP :SET UP PROCESSOR STACK 

85 O010le O17 12456 oo0024 MOV #PFAIL’ 3824 :SET UP POWER FAIL TRAP 

866 001020 7 010670 CLR STFLG “CLEAR TEST START FLAG 

867 001024 O05067 010624 CLR PASCNT :CLEAR PASS COUNT 

868 001030 005067 010622 CLR ERRCNT : CLE T 

B59 001034 005067 010612 CLR ERRFLG :CLEAR ERROR FLAG 

§70 001040 ? Ol CLR RRFLG ;CLE ERROR 

871 O01044 109401 012622 TYPE MTITLE :TYPE TITLE MESSAGE 

872 O01050 005767 010636 TST {NIFLG ; CHECK INITIALIZATION FLAG 

g73 001054 901001 BNE VEC1 IF NOT 0, CHECK SWITC 
!FOR REINITIALIZATION 

875 0010S 04 BR VEC2 

876 001060 67 OO0001 176502 VEC1: BIT #SWOO, SWR ~ SWOO=1, GET NEW VECTOR 

877 OO1066 O01445 BEQ BEGIN AND CSR 

878 901070 012701 000300 vEC2: MOV #300,R1 

875 001074 Ole702 9o0020e2 MOV #302’ Re 

g8C 001100 012703 MOV #4,R 

881 001104 010271 1S: MOV Re’ (RL) sRESTORE TRAPCATCHER 

882 001106 o0S01e CLR (Re) :IN FLOATING VECTOR AREA 

883 001110 060301] ADD R3,R1 

884 OOllle O6030e ADD R32, Re 

88S 001114 Oe0le7 op1000 CMP R1; #1000 

886 901120 001371 SNE 1 

887 OOllee 104403 INSTR ; INPUT BODRESS OF DEVICE VECTOR 

B88 001124 012670 MVECTOR :MESSAGE “VECTOR ADDRESS-" 

889 OOlles 104405 PARAM ; CONVERT STRING TO OCTAL 

890 601130 300 :LOW LIMIT 

g3 00113 000779 770 ‘HIGH LIMIT 

892 001134 Olisve DHRVEC i OCATIONS TO BE FILLED 

892 001136 003 .BYTE 3 ; NUMBER OF LOCATIONS 

894 001137 004 “BYTE 4 MASK 

895 001140 104403 INSTR STRBU T ADDRESS OF DEVICE CSR 

896 001142 Ole712 MREGAD :MESSAGE "CONTROL REGISTER ADDRESS-" 

897 901144 104405 PARAM ?CONVERT STRING TO OCTAL 

898 001146 O00000 0 iL IMIT 

899 001150 177776 177776 LIMIT 

$00 001152 011620 DHSCR iCOcar Ons TO BE FILLED 

901 001154 007 .BYTE ? ; NUMBER LOCATIONS 

$02 001155 010 “BYTE 10 LSB ask 

803 O01156 016767 O104SY O104S4 MOV DHSSR, DHSLR :SET UP ADDRESS OF SILO 

904 001164 005267 O10450 INC DHSLR :STATUS REGISTER HIGH BYTE 

905 001170 005767 O1OSié TST INIFLG *IF INITIALIZATION FLAG 

906 601174 O01002 BNE BEGIN ‘IS CLEARED 

307 001176 005167 o10510 COM INIFLG : SET 

go ;PROGRAM START 
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310 :CHECK FOR PROGRAM START AT SELECTED ADDRESS 
312 991202 012767 909340 176566 BEGIN: NOV #340,°5 : LOCK Ck QUT INTERRUPTS he 
LL 
ati Beists asians 176346 8IT suai SiR iE SWO1=1 
815 O0l222 001410 BEQ 1$ ; GET PC FOR PROGRAM START 
916 001224 104403 INSTR T PC 
$17 001226 013056 MTSTPC {MESSA GE “TEST PC” 
$18 901230 104405 PARAM :CONVERT STRING TO OCTAL 
8198 001232 00 
$20 001234 017500 17500 
921 001236 000207 RETURN 
922 001240 001 .BYTE 1 
$23 001241 001 .BYTE 1 
Sis ob 1ete p09419 oR 2$ 
825 001 12767 001274 O1O4OE 1S: MOV #71, RETURN ;NORMAL START 
$26 001252 005767 O10436 TST STFLG IF LOOPING, bypaes TYPEOUT 
$27 001256 001004 BNE 3$ 
$30 Boise Aeato 010264 33: IMP YRE TURN START TESTING 


DZDHI 
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932 
$33 :FLUSH UART BY TRANSMITTING 2 NULL CHARACTERS 
934 3 ON LINE 0 
935 ET BREAK BIT FOR LINE O 
336 : TRANSMIT BINARY COUNT PATTERN ON LINE O 
7 po ay TRI ONL y 1 CHARACTER 1S RECEIVED 
38 TISA BREAK 
940 901274 012767 OCOOB4O 176474 Ti: MOV 0,°S E ALL INTERRUPTS 
O41 Spt Sas 12767 010356 MOV $30. tcOUNT 1a FOR 2h TRERRT IONS 
SH Gee Bee HR BY ENS §=| ia Uc aee 
6 ; 
o44 ope 767 seen ISR CLRALL ‘CLEAR ALL BUS ADDRESS AND 
S45 sus RODRE ss i MEMORY LOCATIONS 
a46 991330 01 oo o1026e2 MOV #0, JDHSCR LEC 
947 001336 01 Bo oeS 010262 MOV #NULL , JDHBA :SET UPT TO TRANSMIT . CHARACTER 
948 001344 012777 177776 610256 MOV #-2, JOHBC :TWO OS WILL BE TRANSMITTED 
$48 001352 012777 033503 010244 MOV #33503, IDHLPR :SET LINE SPEED=9600 BAUD 
350 ; CHARACTER LENGTH =8 BITS 
951 001360 012777 900001 010244 MOV #1, JDHBAR :SET BAR BIT FOR LINE O 
952 001366 122777 O00002 O10244 iS: CMPB #2. JDHSLR WAIT FOR 2 CHARACTERS TO BE RECEIVED 
953 001374 001374 BNE 1$ 
864 001376 012777 oo4000 010214 MOV #81711, 3DHSCR ;MASTER CLEAR INTERFACE 
965 001404 010777 010206 MOV #0, JDHSCR “SELECT LINE O 
956 001412 012777 011754 010206 MOV #TBUF , JDHBA :SET UP TO TRANSMIT 400 
967 001420 012777 177400 0O10e0e MOV #-400' JDHBC : (OCTAL) CHARACTERS. 
Prats 001426 12777 033503 910179 nov #33503 SDHLPR :LINE SPEED =, 88 600 BAUD 
a6 BBiaae 1 Bi Btes V a} spre et *61f FoR Rta 
$61 O014SO 005777 O10iSE 2s: TST JOHBAR :WAIT FOR ath  OHARACTE RS 
256 pot HEY 90 :TO BE TRANSMITTED 
001 1 900001 010154 5 81, 3DHSL® CHECK TO SEE THAT ONLY 
gee SOI4Ee Ol77O4 OIOL4M Soy = SBHSSR. RM TRS TeRCTUAL RECEIVED DATA 
966 Bbiage Bapeoy BAbadd BIC 3300-84 :CLEAR UNWANTED BITS 
967 001476 O1270S 900400 MOV 00; RS ; (RS) =EXPECTED SILO FILL LEVEL 
966 O01S02 104000 HLT 0 *MORE THAN ONE CHARACTER RECETVED ERROR 
S68 001504 917704 ol01ie 2$: MOV JDHNRC, RY :READ NEXT RECEIVED CHARACTER REGISTER 
$70 001510 026704 010702 CMP RWRDO, RY :IS RECEIVED CHARACTER A BREAK 
871 001514 001403 BEG 4 
$72 OO1516 O16705 010674 MOV RWRDO, RS ;(RS)=EXPECTED RECEIVED CHARACTER 
973 001522 104001 HLT 1 *RECEIVED DA 
on 001524 104400 4§: SCOPE ‘CHECK FOR ITERATIONS, LOOP 
276 yen gt BY TRANSMITTING 2 NULL CHARACTERS 
978 : SET BREAK BIT FOR LINE 1 
979 : TRANSM COUNT PATTERN ON LINE 1 
980 VERIFY er: "OMY i 1 CHARACTER IS RECEIVED 
381 :AND THAT IT IS A BREAK 
983 001526 012767 O00340 176242 Te: MOV #340, PS ;DISABLE ALL INTERRUPTS 
984 001534 O12767 O000020 010124 MOV #20, {COUNT : SET UP FOR 20 ITERATIONS 
ges 001542 012767 O017S6 O101le MOV #4$ ESCAPE :SET UP TO ESCAPE TO NEXT TEST 
012777 010042 MOV sert tl QDHSCR ‘RASTER CLEAR INTERFACE 


004767 010144 JSR C,CLRALL ;CLEAR ALL BUS ADDRESS AND 


= em me - * ant ~~ = .—* = Piet - * Oe A, Se . Teeter « 
| DDH _MACYII 27:1008) 29-SE°-76 14:44 PAGE 25 SEG 0024 
| S20 fc.eli  *pS-egboSe iSrab e 
sis * ae a inert :BUS ROORESS MEMORY LOCATIONS 
Phi pe ie 6 Re fe ua een ee 
ee Beizos SiS5> Agsec$ giShF “OV 933603, SOHLPR Ee ene Serbatess BALL 
| 884 goleie 012777 19012 MOV 82, BDHBAR Re BIT ron LIKE LS 
= Bie beta Bopoce BiSBIS 18: (SREB 8g, @DHSLR SHAIT FOR 2 CHARACTERS T0 BE RECEIVED 
oq? tes 1277 900 MOV 88IT11, JOHSCR Pats CLEAR INTERFACE 
$98 00} 012777 } 4 MOV #1, DDHSCR : SEE crt 
3 Doles g1e777 ll 4 MOV ate , JOHBA :5E ‘ Q FaeventT 400 
| 1B, Doi bes ee pee Beir MOY BaaSHS DORLPR eam co §E50 Baud 
i is fi ees Ma Spit a a SET BREFK BIT FOR LINE , 
| tae Bei Soe Baooos 2s: TST SOHBAR {WAIT FOR ALL ShaRAC TERS 
1005 961756 BNE 2s :T0 BE TRANSMIT 
iS 30171 l 90000: 007722 ‘ $1, 30HSLR “CHECK TO SEE THA 
se 
ioe rae ieee 007712 aa 3 csp iB] ORTON RE ENED ae 
ee Gee Bee a: eee sire 
git Sette 1 HLT ’ SARE FORA OnE SreaciER BEE ved ERROR 
| 3012 901736 017704 3s MOV SOHNAC, RY :READ NEXT RECEIVED CHARACTER REGISTER 
C13 boi 7e O67 34 O104s2 CMP RWRD1, RY :IS RECEIVED CHARACTER A BREAK 
i514 abi 7 14 BEO 4§ 
1015 O01 016705 clo444 MOV RWRODL,RS : (RS) =EXPECTED RECEIVED CHAFACTER 
' {O16 001754 104001 HLT 1 “RECEIVED DATA ERROR 
1917 001756 104400 4S: SCOPE CHECK FOR ITERATIONS, LOOP 
| 1018 :FLUSH yART BY TRANSMITTING 2 NULL CHARACTERS 
ite] : IT FOR LINE 2 
oe | Lem, NARY COUNT PATTERN ON LINE 2 
1022 : VERIFY NT et Ore Y 1 CHARACTER IS RECEIVED 
| ides AND THAT IT oe BREAK 
ifee 001760 O12767 OOOO 176010 T2: MOV #340, PS sDISABLE ALL INTERRUPTS 
i 3176 12767 porb7e MOV 820, {COUNT :SET UP FOR 20 ITERATIONS 
| te 1575. Tests NOY SBTTIT SDHISCR Aes up fteee NERCACES 
iS5e Boss Bosrer Sarvs JSR "CLAALL ADDRESS AND 
| oes rt ssi BUS RORY LOCATIONS 
: 912777 goooce 007576 Mov 82 SOHSCR Sint a hi 
ae 002030 Bieeee S758 BoSe8 MOV 8-2 Sater ) itis amin Be PRANSHI TT ED 
1035 002036 012777 033503 007560 MOV 3603, JDHLPR “SPEED=S60) BAD 
1537 oosows Qle777 D00004 DD7sEO MOV + Bate Greet ies ‘ve 
ips one 0s go00de O07660 1S CMPB ITOFOR 2 CHARASTERS 10 BE RECEIVED 
tba Ese 004000 ae IT QDHSCR MASTER Chee. INTERFACE 
1 | 0075 MOV 1 N 
! 1 75> MOV sya SELECT 
ne PESBoE B18 11754 Bases MOV -SET UP TO TRANSMIT 400 
1043 902104 012777 177400 O0751e MOV #-400' spec S(COCTAL) CHARACTERS 





Te 


Ronee eee ey me 


BBRER RBBB RBH SC 


v 
i 


~~ 
© 


pets perce mbterncte Shuji ane nl 8 
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LAFRENGHS ZRGG . 


12777 O 07504 MOV 823503, DHLPR sLINE : 
S fe catch 750¢ MOV 84, DOHBCR ise SPEAK giy oR LINE 2 
777 007476 MOV 84" JOHBAR -SET BAR BI FOR Ne 

phesee oy 23 TST SWAIT FOR ALL neRAc ERS 
* 900001 907470 SSe St aneuh ee EES omy 

reac ee soy 3s SR, RY $1 CHARACTER Ree rere eta 
oe Se a Bik Helga 

fs Mt “oy SORE TORR ONE. ener ten RECETUED. ERROR 
bisoo8 po742¢ 3s: HOV BOHNRC, RS iRERE NEXT RECEIVED CHRRAC TER REGISTER 
Seb704 010222 cre RuRO, Fe :IS RECEIVED CHARACTER A BREAK 
cE 38e 010214 MOV RWRDZ, RS ; (BS) SEXPECTED RECEIVED CHARACTER 

104001 HLT 1 RECEIVED DA 

104400 4: SCOPE “CHECK FOR ERATIONS. LOOP 


;FLUSH UART BY TRANSMITTING 2 NULL CHARACTERS 


F 
VERIFY HTAt ma ee TP Pei 


[AND THAT IT IS A 
12767 175 T4: MOV #340,PS ;DISABLE ALL INTERRUPTS 
bigrer Arsess MOV 820, {COUNT :SET UP FOR 20 ITERATIONS 
12767 Odes42 007426 MOV 84$ ESCAPE :SET UP TO E TO NEXT TEST 
012777 007356 MOV eSItil aDHSCR *MASTER CLEAR INTERFACE 
004767 907460 ISR PC, CLRALL :CLEAR ALL BUS AND 
20 my aR BEEP e oem Lorrie 
Bt 11722 eee MOV L A :SET UPT Toc TER 
gt i 007349 Tao 9 0S WILL 8 mi BE TRANSMITTED 
15002 SPEED=9600 SAUD 


: aaRRC TER LENGTH =8 BITS 
:SET BAR BIT FOR LINE 23 


g 


01 10 326 MOV 10, IDHBAR 
ie 7 awa 326 18: Hee te, SOHSLR WAIT FOR 2 CHARACTERS TO BE RECEIVED 
01 907276 MOV #81711, 3DHSCR : MASTER CLEGR. INTERFACE 
012777 270 MOV $3, JDHSCR sae eC LINE 
Bie rads Borees Moy aTBLF , SOHBR joey en = _ 

i 1 oo ROY #33503 oe IT ‘For one 3 

toga 

Se veeste Bo3 584 MOV sich AR ‘st tis 
005777 2s: TST JOHBAR : WAI 
001375 BNE x3 ; be’ SR NEAT ED 

122777 000001 007236 CMPB ~=—s«a8#1, @DHSLR :CHECK TO SEE THAT 
po14e” BEQ 71 ¢ ER RECEIV 

1 007226 HOV atHsSR RY sR =A TU ecEIvED DATA 

66 UNWANT 

§7533¢ vat MOV #400/RS CRS seNPecY sito FILL LEVEL. 

404950 HLT :MORE THAN ONE CHARACTER RECE! ERROR 
17704 007174 38: MOY JOHNRC, RY ?READ NEXT RECEIVED CHARACTE ® Bye 
026704 007772 CMP RWRD3, RY :IS RECEIVED CHARACTER A BREAC 
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MACY11 27(1006) 29-SEP-76 14:44 PAGE 27 SEG O02 
ll 23-SEP-76 14:42 
oo2432 901403 BEO 48 erin 
052434 S1é70S oo77E4 MOV RUROS, RE s(RS)EXPECTED RECEIVED CHARACTER 
503440 104001 HLT :RECEIVED DATA ERROR 
O0s442 1046400 4$: SCOPE “CHECK FOR ITERATIONS, LOOP 
‘ies BY TRANSMITTING 2 NULL CHARACTERS 
36 ar Bp NpRY COURT Pa PATTERN 
i TERT Y es ONLY CHARACTER ene et ven 
-AND THAT IT IS A BREAK 
oo2444 012767 000340 175324 TS: MOV #240, PS :D SABLE BRUPTS 
Sosues bisves Speesy bovirs MOV aa sR ist cor 2b ene XT TEST 
SeSdEE 1 Bosna ee MOV sSItil, DDHSCR : rR ope ER TheERe ier 
002474 004767 007226 JSR PC, CLRALL :CLEAR ALL BUS ADDRESS AND 
: Bus Se MEMORY LOCATIONS 
002500 012777 900004 oO07112 MOV 84, JDHSCR : Pee TT 4 
002506 Ole777 Oll7e2e O07lle MOV #NULL, JOHBA :SET UPT TO TRANSMIT O CHARACTER 
002514 012777 177776 007106 MOV 8-2, JOHEC -TWO OS WILL BE TRANSMITTED 
002522 012777 033503 007074 MOV 33503, IDHLPR :SET LINE SPEED=9600 BAUD 
: CHARACTER TH =8 BITS 
002530 012777 000020 907074 MOV 820, JDHBAR :SET BAR BIT FOR LINE 4 
Seeb36 1ee77? oo00de 907074 1S: cHPe a2, SOHSLR WAIT FOR 2 CHARACTERS TO BE RECEIVED 
o02s46 O01 oo4o00 907044 MOV e871 R ;MASTER CLEAR INTERFACE 
002554 pies d00004 007036 MOV sont ; :SELECT LINE 4 
002562 012777 011754 007036 , JDHBA :SET UP TO T T 400 
002570 012777 1 007032 MOV $400 JOHEC sCOCTAL) CH CHARACTERS 
poes7e O1e777 032503 997020 #33503, QHLPR SPEED = 3600 BAUD 
paseo Se 000020 Booars MOV 220, sDHBCR ae bee 1F FoR a 
obese 007006 2s: TST SDHBAR aes 
001375 BNE 2 45 ve oR 
002626 122777 000001 007004 CMPB sa 1, @DHSLR : CHECK TO SEE TH THAT 
Bosese | 51754 ’ DeACTURL REC nes Sai 
1 006774 MOV SR, RY i tea ienc RECEL DATA 
002642 04 BIC Ra : CLEAR 
002646 012705 900400 MOV #400; RS : (RS) = EBS sito Seri LEVEL, 1 
o026S2 104000 HLT 9 :MORE THAN ONE CHARACTER RECEIVED, ERROR 
002654 017704 o0674e 3S: MOV JDHNRC, RY ?READ NEXT RECEIVED CHARACTER REGISTER 
002660 026704 O07542 CMP RWRDY, RY :IS RECEIVED CHARACTER A BREAK 
002664 001403 BEQ 4 
O0S66 016705 007534 MOV RWRDY, RS ; (RS) =EXPECTED RECEIVED CHARACTER 
002672 104001 HLT l "RECEIVED DATA ERROR 
002674 104400 4§; SCOPE :CHECK FOR ITERATIONS, LOOP 


;FLUSH UART BY TRANSMITTING 2 NULL CHARACTERS 


SET BREAK BIT FOR LINE 5 

; TRANSMIT BINARY COUNT PATTERN ON LINE S 
!VERIFY HTAT ey 1 CHARACTER IS RECEIVED 
;AND THAT IT IS A BREAK 


002676 012767 000340 175072 TE: MOV #340,PS ;DISABLE ALL INTERRUPTS 


| E03 

| DZDMI MACYLL 2711008) 29-SEP-76 14:44 PAGE 28 

| OZDHIC.P11 29-SEP-76 14:42 

? MO  ICOUNT 
He Sr Sle GR re ERT 

tie ie BASSES BR ORS ek per Et hae? 



















1160 :BUS ADORE 
1181 002732 012777 res MOV 8S, JOHSCR “SELECT LINE 
gongs: MOV & : T 0 CHARACTER 
tiBS RRESS ee Passe BREE ED Hoy atta agree FE PET Ie. Be thanserFreL 
| 1164 002754 012777 033503 o06642 MOV 833503, JDHLPR :SET NE Bau 
| digs :C R NgIH 38 I 
| TIE ooe762 012777 O00040 ox0eb4e2 MOV #40, JDHBAR :SET BAR BIT FOR LINE S 
| Jie? 0028770 122777 o00002 O06642 1S: CMP te, SOHSLR : WAIT FOR 2 CHARACTERS TO BE RECEIVED 
| jlse 002776 31 BNE 
116s 003900 ea 004 906618 HOV Biri QOHSCR pats CLEAR. INTERFACE 
1171 Bpsare Se ri 006604 MOV a2 SOHeCR Sp RANSMIT 400 
117 003022 012777 177400 006600 MOV #-400' JDHBC s (OCTAL) CHARACTER S 
153 pers pisces Seaacs boeese MOY #3503, SRHLPR iL INE SPEED £3200 BAUD 
ite Poses phere? peeng =OoeseO Os. «6OSY Ss Some Mey FO nA, CHERACTERS 
He Bee SS cm SS Haoae he pee 
1178 003066 001407 BEQ P TEC ARAC TER wae RECEIVED 
11g 603070 917704 MOY SOHSSR, R at ua ae DATA 
Bt rset Bis8¢ nov #500, RS Gere sfo FILL R Pesetied nail 
1184 002106 pores 38: MOV JOHN, RY RED NEXT rex} Face! TEAC RRaC Se RE +cREE 
1185 902112 026704 CMP RWRDS , RY CEIVED CHARACTER ry ist ene 
1186 O03116 001403 BEQ 4 
1187 003120 016705 007304 MOV RWRDS RS em enuaries RECEIVED CHARACTER 
i188 002124 10400) HLT l "RECEIVED DATA 
118 903126 104400 4S: SCOPE !CHECK FOR ITERATIONS, LOOP 
119] :FLUSH UART BY TRANSMITTING 2 NULL CHARACTERS 
1192 [ON LINE & 
1193 : SET BEAK BIT FOR LINE 6 
11% : TRANSMIT BINARY COUNT PATTERN ON LINE & 
1165 : VERIFY HTA ONLY 1 CHARACTER IS RECEIVED 
113% [AND THAT IT IS A BREAK 
1198 003130 012767 000340 174640 17: MOV #340, PS ;DISABLE ALL INTERRUPTS 
1199 003136 012767 009020 MOV #20, COUN :SET UP FOR 20 ITERATIONS 
1200 002144 012767 002360 006510 MOV #43, ESCAPE :SET UP TO ESCAPE TO NEXT TEST 
1201 O0031S2 012777 904000 O06440 MOV #81t11. aDHSCR sMASTER CL CLEAR INTERFACE 
ete 0031606 004767 O06542 ISR CLRAL S _AOOR $5 MO 
tee 003164 012777 OO0000S oDb426 MOV #6, JDHSCR SADNESS 
iets 003172 012777 011722 O0e 426 HOV aNULL, 3OHBA : SET UPT wie TRANS NIT _O CHARACTER 
158% Mieke pistes 4] Vv age ho Soya pr iTHO OS WILL BF TRaNSHrTT 
1208 ; HARACTER Lene =8 BITS 
1209 003214 012777 000100 o06410 MOV #100, JDHBAR :SET BAR BIT FOR LINE & 
1210 O03¢22 122777 oO00002 O06410 iS: CMPB te, JOHSLR :WAIT FOR 2 CHARACTERS TO BE RECEIVED 
léi1 0032306 601374 BNE 


a 


OZDHI_ _MACYLI_27( 1008) 23-SEP- -75 14:44 PAGE 29 _. SEG COZ 
DIDHIC.P11 29-SEP-76 14:42 ais 
1218 003232 912777 904000 906360 Rov sBITL1 QDHSCR :MASTER CLEAR INTERFACE 
4 ¢ : 
GE ies OR ee a tee 
: is 77? Vv 8-4 sCOCTAL) CH CTE 
1 1 V 8 ; = 
ae a a ae eee 
1218 Bossoe eee 2s: TST EY lat {WAIT FOR ALL SRakac rERs 
| ee (7S oom once || fife fama ele Ieee TRE om 
igs. Rake 1407 Q y ean 1 HE CARACTER WAS RECEIVED 
l223 003322 17704 006310 V QOHSSR, R4 : (R4)SACTUAL RECEIVED DATA 
1224 003326 O42704 BIC #200, R4 ‘CLEAR UNWANTED BITS 
ise 003332 012705 000400 MOV #4005 fT aL SiL0 FILL LEVEL , a 
-l22 NekeRts 40008 006255 38: V C,R4 PEGS N NEXT gree SER CERO tER ean 
1228 003344 026704 007062 oMp RWRDG , RY :IS RECEIVED CHARACTER 
l223 003350 001403 BEQ 4 
tes0 003352 01&705 007054 MOV RWRDE , RS 3 (RS )=EXPECTED RECEIVED CHAPACTER 
1231 003356 194091 T 1 RECEI VED 0A 
ez 003365 104400 4$: OPE HECK FOR TTERET TONS. LOOP 
1234 : FLUSH UART BY TRANSMITTING 2 NULL CHARACTERS 
less sON LINE 7 
1236 ;SET BIT FOR LINE 7 
1237 ANSMIT BINARY COUNT PATTERN ON LINE 7 
1228 :VERIFY HTAT ONLY 1 CHARACTER IS RECEIVED 
1233 [AND THAT IT IS A BREAK 
1241 002362 012767 O00340 174406 TIO: MOV #340 ;DISABLE ALL INTERRUPTS 
1242 003370 012767 006270 MOV #20, [COUNT :SET UP FOR 20 ITERATIONS 
1243 003376 012767 O03612e O06eSé MOV #4$'ESC :SET UP TO ESCAPE TO NEXT TEST 
1244 003404 012777 004000 O06=206 MOY #81tI1. aDHSCR :MASTER CLEAR INTERFACE 
1245 003412 004767 006310 ISR PC, CLRAL 'CLEAR ALL BUS ADDRESS AND 
L24é :BUS RODRESS MEMORY LOCATIONS 
1247 003416 012777 000007 006174 MOV #7, IDHSCR :SELECT LINE 7 
1246 0032424 012777 O11722 006174 MOV #NULL, JDHBA -SET UPT TO TRANSMIT C CHARACTER 
1248 003432 012777 :77776 006170 MOV 8-2 :TWO OS WILL BE TRANSMITTED 
1250 003440 012777 033503 O06i56 MOV #33503, JOHLPR :SET LINE SPEED= 
1251 ;CHARACTER LENGTH =8 BTS 
1252 OO3446 012777 000200 006156 MOV #200, JDHBAR ?SET BAR BIT FOR LINE 7 
1253 002454 122777 O00002 OO6iS6 1S: CMPB se, JDHSLR WAIT FOR 2 CHARACTERS TO BE RECEIVED 
1254 903462 O01 BNE 1 
1 003464 B39 004000 006126 MOV #81T11, 3DHSCR :MASTER CLEAR INTERFACE 
1256 003472 012777 006120 MOV #7, JOHSCR :SELECT LINE 7 
1257 003500 012777 011754 006120 MOV #TBUF , JDHBA :SET UP TO TRANSMIT 400 
1258 003506 012777 906114 MOV 4-400 aDHBC : (OCTAL) CHARACTERS 
1253 003514 012777 033503 006152 MOV #33503, JDHLPR 3L PEED = BA 
1260 003522 012777 006104 MOV #200, JDHBCR :SET BREAK BIT FOR LINE 7 
1261 003530 912777 000200 006074 MOV #200 :SET BAR BIT FOR LINE 7 
lobe 005777 006070 2s: TST :WAIT FOR ALL CHARACTERS 
1263 002542 001375 BNE 2$ :TO BE TRANSMITTED 
1264 003544 122777 O00001 OOEDEE C #1, JDHSLR ;CHECK TQ SEE THAT ONLY 
1265 90 407 BEG :1 CHARACTER WAS RECEIVED 
1 54 017704 MOV JOHSSR, RY :(R4)=ACTUAL RECEIVED DATA 


cot OO&0S& 
l2é7 003560 042704 000300 BIC #300,R4 CLEAR UNWANTED BITS 
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MACY11 27( 1006) 


012708 
O4 


003614 
003622 


os 


4 


Bye 


29-SEP-76 1 


GO3 


#400 ,RS 


IRC, RY 
RWRD?, R4 


4§ 
oe 


Boa Dy a nL SILO FILL LEVEL, 


BeSE ret war Ay RetelVep cone ane ER 


VED CHARACTER 


He Fae RECEIVED CHARACTER 
RECEIVED DATA ERROR 
;CHECK FOR ITERATIONS, LOOP 


;FLUSH ‘ee BY TRANSMITTING 2 NULL CHARACTERS 
AK BIT FOR LINE 


;SET BRE 10 
: TRANSMIT BINARY COUNT PATTERN ON LINE 10 


VERIFY HTAT ONLY 1 


:AND THAT IT IS A BREAK 


23° 3 SEP-78 14:44 PAGE 30 
000400 MOV 
006024 2$: Vv 
alge: Sco 
006624 V 
HLT 

4g: SCOPE 

900340 174154 Tll: MOV 
000020 006036 MOV 
904044 9O06024 MOV 
094000 005754 MOV 
006056 ISR 
p00010 o0s74e2 MOV 
0117; 005742 MOV 
177776 005736 MOV 
033503 005724 MOV 
000400 0057; MOV 
goood2 005724 15: CHP 
004000 005674 MOV 
000010 OOS&66 MOV 
011754 OO5&66 MOV 
177400 O05662 MOV 
033503 005650 MOV 
000400 90552 MOV 
990400 o0sé4e2 MOV 
005636 2S: ST 
900001 o0S634 CHP 
MOV 

Spo800 ts 
009400 MOV 
at 

005572 3S: MOV 
006402 CMP 
BEG 

006374 MOV 
HLT 

4§: SCOPE 


#10 SDHSCR 
#NULL, aD 
$-2 SHC 


1 CHARACTER IS RECEIVED 


;DISABLE ALL INTERRUPTS 
;SET UP FOR 20 ITERATIONS 
TO_ ESCAPE TO NEXT TEST 
INTERFACE 


;CLEAR ALL BUS ADDRESS AND 

;BUS ADDRESS MEMORY LOCATIONS 
3 CT LINE 10 

O TRANSMIT O CHARACTER 
WILL TRANSMITTED 


LINE 1 
WAIT FOR 2 CHARACTERS 
fog CLEAR INTERFACE 
:SELECT LINE 1 
:SET UP 76 TRANSMIT 400 
; (OCTAL? CHARACTERS 
LINE SPEED = 9600 BAUD 
SET BREAK BIT FOR LINE 10 
LINE 10 
OR ALL CHARACTERS 


QO BE RECEIVED 


UNWAN 
(RS) =EXPECTED SILO FILL LEVEL 
ORE THAN ONE CHARACTER RECETVED ERROR 
‘READ NEXT RECEIVED CHARACTER RECiSTER 
:IS RECEIVED CHARACTER A BREAK 
; (RE) =EXPECTED RECEIVED CHARACTER 


RECEIVED DATA ERROR 
:CHECK FOR ITERATIONS, LOOP 


;FLUSH UART BY TRANSMITTING 2 NULL CHARACTERS 


ON LINE 11 
;SET BREAK BIT FOR LINE | 


; TRANSMIT BINARY COUNT PATTERN ON LINE 11 


SEG 0029 
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MACY11_ 27( 1006) + ae 76 14:44 PAGE 31 SEG 0030 
Pll 29-SEP-76 14:4 


:VERIFY HTAT ONLY 1 a IS RECEIVED 
;AND THAT IT IS A BREAK 


173722 Tle: MOV #340, PS sDISRELE ALL_ INTERRUPTS 


OO4O46 012767 000340 
O040S4 012787 005604 MOV #20, [COUNT SET E FOR 2 PTERATIONS 
004062 O12767 OO4e76 905572 MOV 84$° ESCAPE : SET bp 10 ESCAPE TO NEXT TEST 
004070 012777 OO4000 o0sS2e2 MOV siti QDHSCR ;MASTER CLEAR INTERFACE 
004767 O005624 ISR PC, CLRALL BUS ADDRESS AND 
BU ss Y LOCATIONS ’ 
004102 012777 000011 005510 MOV #11 SDHSCR :SELECT LINE 11 
004110 9120777 011722 005510 MOV aN NULL :SET UPT TO TRANSMIT 0 CHARACTER 
004116 012777 177776 905504 MOV SE ANBe ‘TWO OS WILL BE TRANSMITTED 
004124 0612777 033503 0605472 MOV #35803. JOHLPR :SET LINE SPEED=9600 BAUD 
: CHARACTER LENGTH =8 BITS 
004132 012777 9001000 oDs47e2 MOV #1000, JOHBAR :SET BAR BIT FOR LINE 1 
bow 146 12777 000002 005472 1S: CHP te, , JOHSLR :WAIT FOR 2 CHARACTERS TO BE RECEIVED 
004150 012777 oo4O00 ooSs4e MOV #81711, IDHSCR :MASTER CLEAR INTERFACE 
004156 012777 000011 005434 MOV #11, JDHSCR SELECT L 
004164 012777 011754 005434 MOV sTBUF, SpHBA :SET UP TO S ANSHIT 490 
004172 012777 177400 005430 MOV 8-400’ JDHBC :(OCTAL) CHARACTERS 
004205 012777 033503 416 MOV a JDHLPR :LINE SPEED = 9600 BAUD 
004 012777 001000 420 MOV #1000, JDHBCR :SET BREAK BIT FOR LINE ll 
004214 012777 001000 905410 #1000’ 3DHBAR :SET BAR BIT FOR LINE 1 
222 005777 oOs4O4 2$: TST QOHBAR ‘WAIT FOR ALL CHARACTERS 
226 001375 BNE 2$ :TO BE TRANSMITTED 
004230 122777 000001 ocos4de CMPR =s-s«# 1, DHSLR ;CHECK TQ SEE THAT ONLY 
004226 001407 BEG 1 CHARACTER WAS RECEIVED 
17704 9005372 MOV JDHSSR, RY s (RA) ACTUAL ECEIYED DATA 
ae 0 oro eat 1h a0" } it YPECT a . 
524 neta HLT 0 Gee sea 1D ee teh radar ERROR 
256 017704 oos340 3S: MOV DOHNRC , RY READ NEXT T RECE IveD CHARAC TE R BOREGISTER 
she Gee 0061s2 chp PURO LIZRY :IS RECEIVED CHBRECTE 
004270 O16705 o06144 MOV RWROL1,RS : (RS)SEXPECTED RECEIVED CHARACTER 
274 104001 HLT i RECEIVED DATA ERROR 
004276 104405 4§: SCOPE :CHECK FOR ITERATIONS, LOOP 


;FLUSH UART BY TRANSMITTING 2 NULL CHARACTERS 
ON LINE 12 


L 
:9ET BREAK BIT FOR LINE le 

ANSMIT BINARY COUNT PATTERN ON LINE le 
‘VERIFY HTAT ONLY 1 CHARACTER IS RECEIVED 
:AND THAT IT IS A BREAK 


004300 012767 000340 173470 T13: MOV ;DISABLE ALL INTERRUPTS 
004306 012767 900020 005352 MOV 120, 20, 1ESuNT sgt uP FOR 20 ITERATIONS 
004314 012767 004630 005240 MOV $' ESCAPE :SET UP TO ESCAPE TO NEXT TEST 
004322 912777 004000 005270 MOV corti QDHSCR ‘MASTER CLEAR INTERFACE 

004330 004767 005372 ISR PC, CLRALL ?CLEAR ALL BUS ADDRESS AND 

904 01 12 o0s256 MOV #12, IDHSCR TPCT TINE oe amuniaets 
604342 B1ga55 BES 005256 MOV eNUCL JDHBA PSET UPT TO TRANSMIT 0 CHARACTER 
004350 012777 177776 O0SeS2 MOV Sbuae :THWO OS WILL BE TRANSMITTED 
004356 012777 033503 o05240 MOV #35803 SOHLPR :SET LINE SPEED=9600 SAUD 
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+4 


es: 


3s: 


4§: 


103 


PAGE 32 


MOV #2000, JOHBAR 


CMPB  =s-_-#, ADHSLR 
NE 1$ 

MOV 881711, IDHSCR 
MOV #12, IDHSCR 
MOV eTBUF , aOHER 
MOV #-400 C 
MOV #32503, JDHLPR 
MOV 900, SOHBCR 
MOV 000; aDHBAR 
TST aR 

BNE 

CMPB =—s«#1, IDHSLR 
BEQ 3$ 

MOV JOHSSR, RY 
BIC 300, R4 

MOV 400, 

HLT 9 

MOV SDHNRC, 

CMP RWRD12;R4 
BEQ 4S 

MOV RWRD12, 85 
HLT 1 

SCOPE 


; CHARACTER at =8 BITS 


;SET BAR BIT F 


LINE 12 
;WAIT FOR 2 SHBRAC TERS TO BE RECEIVED 


;MASTER CLEAR — 


;SELECT LINE ! 


:SET AL) ¢ TQ sce 400 


s (OCT 


NE le 


‘TAIT FOR ALL see ees 
:T0 BE TRANSMITTED 


SHE OK TO. See J A RECETVED 


j (RS) ACTUAL RECEIVED DATA 
AR_UNWANTED BITS 


; (RS) #ENPECTED SILO a0 LEVEL 
HAN ONE C 


: MO) ACT 
READ rot RECEIVED KIBRACTER REGISTER 
-IS RECEIVED CHARACTER A BREAK 


RECETVED 


3 (RS) =EXPECTED RECEIVED CHARACTER 
;RECEIVED DATA ERROR 


:CHECK FOR ITERATIONS, LOOP 


;FLUSH UART BY TRANSMITTING 2 NULL CHARACTERS 


ON _LI 

:SET BREAK BIT FOR LINE 13 

: TRANSMIT BINARY COUNT PATTERN ) 
:VERIFY HTAT ONLY 1 CHARACTER IS 
;AND THAT IT IS A BREAK 


T14: MOV #340 


1$: 


es: 


MOV #13, DHSCR 
MOV #NULL , JDHBA 
MOV #-2 SéuBe 
MOV #33503, JDHLPR 
MOV #4000 , JDHBAR 
CHP #2, JOHSLR 

MOV #B1T11, JDHSCR 
MOV #13, JDHSCR 
MOV #TBUF, HBA 
MOV -400' IDHBC 
MOV #33503, JDHLPR 
MOV #4000, 2DHBCR 
MOV #4000; JDHBAR 
TST JDHBAR 

BNE 2 


N LINE 


LINE 13 
RECEIVED 


;DISABLE ALL IN 
FO 


TERRUPTS 


S ADDRESS MEMORY LOCATIONS 


;BU 
: SELECT 


LINE 13 
:SET tpt” TO TRANSMIT O CHARACTER 


T LINE 1 
WALT FOR 2 CHARACTERS. TO BE RECEIVED 


;MASTER CLEAR INTERFACE 

:SEL LINE 

;SET UP 70 TRANSMIT 400 
CHARACTE 


;WAIT FOR 
:T0 BE TRANSMITTED 


RROR 
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MACYL1 27(1006) 29-SEP-76 14:44 PAGE 33 SE3 0032 
| SS DrC. Pll 29-SEP-76 14:42 
| 1436 004714 122777 900001 od4716 CMPB =s-&1, ODHSLR : CHECK TO SEE witht ONLY 
| 1437 OON7e2 001407 BEG 3$ :1 CHARACTER WAS RECEIVED 
1938 oozes 017704 OO470& OV SHEER RM iieant RECEIVED DATA 
| i889 Bea> B18 bs sisal NOV #400: RS i CRE) EXPECTED SILO FILL LEVE L i send 
| TRB BBS? BT7788  oovesu as:  fBv Sonnac R4 HORE i Res elven Crna Tee HEP, FER 
1443 004746 026704 005472 CMP RWRD13,R4 : CEIVED CHARACTER A BREAK 
1444 904752 001403 REQ 4 
1445 004754 016705 oos464 MOV RWRD13,RS : (RS)SEXPECTED RECEIVED CHARACTER 
1446 904760 104001 HLT 1 “RECEIVED DATA ERROR 
147 004762 104400 4g: SCOPE :CHECK FOR ITERATIONS, LOOP 
| 1438 sFLUSH U ART BY TRANSMITTING 2 NULL CHARACTERS 
1 IT FOR LINE 
| l £3 area KA lef COUNT PATTERN ON LINE 14 
1453 :VERIFY HTAT ONLY 1 CHARACTER IS RECEIVED 
| 135 !AND THAT IT (sa BREAK 
1456 OO4764 012767 000240 173004 T1S: MOV #340, PS s DISABLE ALL INTERRUPTS 
He Hees fie Gy Gee AN Re eae 1 be oedtabe te seh? ves 
| 3458 005006 01 004990 o04604 MOV sBItil QDHSCR SESTER CLE F REACE 
/ 460 905014 004767 004706 ISR PC, CLRALL pat aL BUS  OBRESS AND 
| 1461 "BUS ADDRESS MEMORY LOCATIONS 
| 4462 oO0S020 012777 000014 904572 MOV #14, IDHSCR :SELECT LINE 14 
1463 005026 012777 011722 o0457e2 MOV #NULL . JDHBA ;9E7 UPT TO TRANSMIT 0 CHARACTER 
' 4464 905034 010777 177776 OO4SbE MOV #-2, JOHBC TWO OS WILL BE TRANSMITTED 
| [46S O0S042 912777 033502 o04554 MOV #33503, JDHLPR :SET LINE SPEED=9600 SAUD 
| 1466 : CHARACTER LENGTH =8 BITS 
| 1467 o0S0S50 012777 910000 oD4ss4 MOV #10000, JDHBAR :SET BAR BIT FOR LINE 14 
| $46e 905056 125777 d00002 oo4s54 1S: CMPB #2. SDHELR WAIT FOR 2 CHARACTERS TO BE RECEIVED 
14689 905064 001374 BNE 
1470 005066 012777 ooyo00 oD4se4 MOV #B1T11, JDHSCR ;MASTER CLEAR INTERFACE 
ie Seles plese oes ele | RN Han tip be tetany so 
| 447 pe 195 12777 177400 04512 MOV aTBUF » sDHER 'TOcT ) CHARAC 2 
| Hie Peete Bier fares Boren HOY #39503, SDHLPR gore WBiT FOR CINE CINE 24 
eae 
| 14 Boeise 1 Biopes | Bo4a73 MOV #10000" SDHBER :SET 
1477 005140 777 OO44E6 2S: TST JDHBAR : WAIT oFOR an PORARACTERS 
| [478 Bpetue Te2579 pool oo4NeH BME #1, @DHSLR oe eRe THat 
1480 phe tee 1407 BEG 33° 1 CHARACTER WAS RECEIVED 
1481 005156 017704 oO44s4 MOV QDHSSR, RY :(RY)SACTUAL RECEIVED DATA 
1482 005162 042704 O00300 BIC #300, R4 :CLEAR UNWANTED BITS 
1483 O0S166 012705 o00400 MOV #400; RS :(RS)SEXPECTED SILO FILL LEVEL, 1 
1484 005172 104000 HLT 0 *MORE THAN ONE CHARACTER RECEIVED, ERROR 
1485 005174 917704 oo4H4e2 2S: MOV SJDHNRC , RY “READ NEXT RECEIVED CHARACTER REGISTER 
1386 005200 026704 oose4e2 CHP RAPD, RS :IS RECEIVED CHARACTER A BREAK 
a4 ity 005234 MOY RWRD14, RS ; (RS) =EXPECTED RECEIVED CHARACTER 
1489 005212 104001 HLT RECEIVED DATA ERROR 
; 1490 905214 104400 4S: SCOPE :CHECK FOR ITERATIONS, LOOF 
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29-SEP-76 14:42 


pant ae me Se ea Tt 
RRRRRRERS 


012777 


000340 
poe 
0057’ 

004000 
004222 


T18: 


1S: 


es: 


3s: 


4§: 


T17: 


KQ3 


14:44 PAGE 34 S€o 0023 


jw ok BY TRANSMITTING 2 NULL CHARACTERS 


ke. Eatin Fat RN ON EAN ee 


1 CHARRCT RI 
AND THAT IT I 
MOV #340, PS ;DISABLE ALL INTERRUPTS 
MOV #20, {COUNT :SET UP FOR 20 ITERATIONS 
MOV #4$; ESCAPE :SET UP TO ESCAPE at ie’ TEST 
RELAIS Eee 
gue ACORE Sie lo 
MOV #15 QDHSCR ISELECT LINE 
MOV wNULL ab :SET UPT TO TRANSHIT 0 CHARACTER 
MOV Laer TWO OS WILL BE TRANSMITTED 
MOV #35803" QOHLPR :SET LINE SPEED= 
‘CHARACTER LENGTH =8 BITS 

MOV #20000, JDHBAR :SET BAR BIT FOR LINE 15 
CHP #2, ODHSLR WAIT FOR 2 CHARACTERS TO BE RECEIVED 
MOV #81711 QDHSCR :MASTER CLEAR INTERFACE 
MOV #15, IDHSCR s SELECT INE 15 
MOV #TBUF , JOHBA :SE 0 TRANSMIT 400 
MOV #-400 ?(OCTAL) CHARACTERS 
MOV #33503, JDHLPR ‘LINE SPEED = 9600 
MOY #20000; R :SET BREAK BIT FOR LINE 1S 
MOV #20000’ JDHBAR ‘SET BAR BIT FOR LINE 1S 
TST JDHBAR :WAIT FOR ALL C TERS 
BNE 2 :TO BE TRANSMITTED 
CMPB = #1, @DHSLR :CHECK TO SEE THAT ONLY 
BEQ 3$ 71 ¢ TER E 
MOV JOHSSR, RY 5 (RB) =ACTURL RECEIVED DATA 
BIC #300, -CLEAR UNWANTED BITS 
MOV #400; RS :(RS)=EXPECTED SILO FILL LEVEL, 1 
HLT 0 "MORE THAN ONE CHARACTER CEIVED, ERROR 
MOV JOHNRC, RY :READ NEXT RECEIVED CHARACTER REGISTER 
CHP RURDIS, RY :IS RECEIVED CHARACTER A BREAK 
MOV RWRD1S,RS (RS)=EXPECTED RECEIVED CHARACTER 

T 1 'RECEIVED DATA ERROR 


HL 

SCOPE ;CHECK FOR ITERATIONS, LOOP 
;FLUSH UART BY TRANSMITTING 2 NULL CHARACTERS 

ON LINE 16 

:SET BREAK BIT FOR LINE 16 


; TRANSMIT BINARY COUNT PATTERN ON LINE 16 
VERIFY HTAT ONLY —— IS RECEIVED 


THAT IT IS A 
MOV #340, PS ;DISABLE ALL INTERRUPTS 

MOV #20, [COUNT ‘SET UP FOR 20 ITERATIONS 

MOY #43; ESCAPE :SET UP TO ESCAPE TO NEXT TEST 
MOV s8ITI1, JDHSCR :MASTER CLEAR INTERFACE 

JSR PC, CLRALL ALL BUS 


:C L ORESS AND 
;BUS ADDRESS MEMORY LOCATIONS 
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MACY1I 27 (1008) 29-SEP-76 14:44 PAGE 35 SEQ 0034 
OC. Pll 29-SEP-76 14:42 
1548 OOSSO4 012777 000016 o04106 MOV #16, JDHSCR :SELECT LINE 16 
1548 005512 012777 Oll72e OO4106 MOV eu JDHBA :SET UPT TO TRANSMIT Q CHARACTER 
1550 905520 eas 177776 O04] MOV 8-2, :TWO OS WILL BE TRANSMITTED 
1551 005526 0128777 033503 6040 MOV #35803 oe :SET LINE SPEED=96 
1552 CHARACTER LENGTH =8 BITS 
1553 005534 012777 oO40000 904070 MOV #40000 , JDHBAR ‘SET BAR BIT FOR LINE 1é 
1554 005542 122777 000002 004070 IS: CMPB = &2. BDHSLR WAIT FOR 2 CHARACTERS TO BE RECEIVED 
1555 O0S5S0 001374 SNE 1$ 
1556 905552 012777 004040 MOV #81T11, IDHSCR :MASTER CLEAR INTERFACE 
1557 005560 012777 900016 o04032 MOV #15, JDHSCR :SELECT LI 
1558 012777 011754 904032 MOV #TBUF , JDHBA :SET UP TO TRANSMIT 400 
1559 005574 012777 177400 O040e6 MOV #-400' JDHB :(OCTAL) CHARACTERS 
1560 005602 612777 033503 OO4014 MOV #23503, JDHLPR "LINE SPEED = 9600 BAUD 
1561 005610 012777 O40000 OO4016 MOV #40000; JDHECR :SET BREAK BIT FOR LINE 16 
1562 005616 012777 O40000 O04006 MOV #40000 ; JDHBAR ;SET BOR BIT FOR LINE 16 
1563 005624 005777 O0400e2 2s: TST JDHBAR {WAIT FOR ALL CHARACTERS 
1564 005630 001375 BNE 2s :TO BE TRANSMITTED 
1565 005632 122777 000001 o04000 CMPB #1, 2DHSLR :CHECK TO SEE THAT ONLY 
1586 OOSE4O 001407 BEQ 3$ 1 CHARACTER WAS RECEIVED 
1567 O0S642 017704 003770 MOV QDHSSR, RY : (RY)SACTUAL RECEIVED DATA 
1568 OOS646 042704 000200 BIC #300, R4 :CLEAR UNWANTED BITS 
1568 posse 01270 000400 NOV #400; RS 1s ee Be eee SILO FILL L Ld sana 
1378 poe PPE 403080 003736 3: MOV DHNRC , R4 HORE eM NEXT Seater SERA TE RES REGISTER 
1572 OOS664 026704 oD4sb2 CMP RUROIB, RY -IS RECEIVED CHARACTER A BREAK 
1573 005670 001493 BEQ 
1574 005672 016705 oo4ss4 MOY RURDIE, RS ; (RS) =EXPECTED RECEIVED CHARACTER 
1575 005676 104091 HLT l “RECEIVED DATA ERR 
157% 005700 104400 4g: SCOPE :CHECK FOR ITERATIONS, LOOP 
1578 sFLUSH YART BY TRANSMITTING 2 NULL CHARACTERS 
1580 :SET BREAK BIT FOR LINE 1 
1581 : TRANSMIT BINARY COUNT PATTERN ON LINE 17 
1582 :VERIFY HTAT ONLY 1 CHARACTER IS RECEIVED 
1583 ‘AND THAT IT IS A BREAK 
1585 005702 012767 OO0340 172066 T20: MOV #340, PS ;DISABLE ALL INTERRUPTS 
is 905719 012767 o000020 003750 MOV #20, {COUNT :SET UP FOR 20 ITERATIONS 
18a DOEreN OiS777 OOa000 OOSeEE MOV «SBT SDASCR er ER CLR INTER aa 
i 
1589 005732 004767 003770 JSR Pe CLRALL PEAR AL BUS AD ees AND 
1590 ‘By S ADDRESS NENORY LOCATIONS 
1591 005736 012777 000017 003654 MOV #17, 2DHSCR *SELECT LINE 1 
1692 005744 012777 011722 003654 MOV anUCL aDHBA ‘SET UPT TO TRANSMIT 0 CHARACTER 
1593 005752 012777 177776 003650 MOV C :T WILL BE TRANSMITTED 
1694 005760 012777 033503 903636 MOV $33803 SOHLPR :SET LINE SPEED=9600 SAUD 
1595 ;CHARACTER LENGTH =8 BITS 
1596 O0S766 012777 100000 003636 MOV #100000, DHBAR :SET BAR BIT FOR LINE 1 
1587 005774 122777 OOuude 003636 15S: CMPB  —s- #2, JDHSLR WAIT FOR 2 CHARACTERS” to BE RECEIVED 
1596 O06002 001374 BNE 
1599 006904 012777 003606 MOV eB1TL JOHSCR ;MASTER CLEAR INTERFACE 
1600 O06012 012777 sae ytd 003600 MOV #17, JDHSCR :SELECT LINE 
1601 006020 012777 1734 003600 MOV #7 BUF , SOHBA ;SET UP 8 NE RANSMIT 400 
1602 O06026 012777 003574 MOV JDHBC : (OCTAL) CHARACTERS 
1602 006034 012777 ead 003562 MOV $3360  SOFLPR "LINE SPEED = 9600 BAUD 





M03 


DZDHI MACYLI 27 (1008) 29-SEP-76 14:44 PAGE 36 SEQ 0025 
| OZOHIC.P11 29-SEP-76 14:42 
1804 OO06042 012777 100000 003564 MOV #190000, JDHBCR :°"T QREAK BIT FOR LINE 17 
, 1860S OO060SO 012777 130000 003554 MOV #100000’ aDHBAR ;S¢ 4AR BIT FOR LINE 17 
1608 O06056 005777 O03550 2$: TST SoH HBAR :WA’ FOR ALL CHARACTERS 
1607 O06062 001375 BNE 2s :TO BE TRANSMITTED 
1608 OO6064 122777 000001 o03S46 CMPB =s«#1,DHSLR CHECK T TO SEE THAT ONLY 
1808 006072 001407 BEG 3$ 1 CHARACTER WAS RECEIVED 
1610 008074 017704 003536 MOV JOHSSR, RY :(R4Y)=SACTUAL RECEIVED DATA 
1611 006100 042704 900300 BIC #300, R4 :CLEAR UNWANTED BITS 
1612 906104 O1e70s 000400 MOV #400,85 :(RS)=EXPECTED SILO FILL LEVEL 
1613 006110 104000 HLT 0 :MORE THAN N ONE CHARACTER RECE Ved ERROR 
1614 OO06112 017704 903504 3s: MOV SDHNRC, R4 :READ NEXT RECEIVED CHARACTER REGISTER 
1615 -O06116 026704 004332 CMP RURDI?, RY -IS RECEIVED CHARACTER 5 BREAK 
1616 O06122 001403 BEQ 
1617 006124 O1670S5 004324 MOV RiIRDI?, RS ; (RS)=EXPECTED RECEIVED CHARACTER 
1618 006130 104001 HLT l “RECEIVED DAT 
1629 006132 1044 4§: SCOPE ‘CHECK FOR ITERATIONS, LOOP 
leel ;SET HALF DUPLEX ON LINE O 
lb22 : TRANSMITI A BINARY COUNT PATTERN 
1623 :VERIFY THAT NO CHARACTERS ARE RECEIVED 
1625 006134 012767 O00340 171634 Tel: MOV #340, PS ;DISABLE ALL INTERRUPTS 
1626 006142 012767 000020 003516 MOV #20, [COUNT :SET UP FOR 20 ITERATIONS 
| 1627 006150 012767 O06244 903504 MOV #23. ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
1628 906156 012777 OO4000 903434 MOV sBItil JDHSCR :MASTER CLEAR INTERFACE 
| 1629 006164 004767 003536 JSR PC, CLRALL :CLEAR ALL BYTE COUNT AND 
1630 :AND BUS ADDRESS MEMORY LOCATIONS 
1631 006170 012777 cOD000 oDa4ee MOV HSCR ‘SELECT LINE O 
/ 1632 O06176 012777 011754 O034ee MOV aTBUF a JOHBA 3SET UP TO TRANSMIT 
| 1633 O06204 012777 177400 O03416 MOV #-400' JDHBC 7400 (OCTAL) CHARACTERS 
| 1634 006212 012777 073503 9003404 MOV #73503, JOHLPR :SET RECEIVER BLIND 
| 1635 ‘LINE SPEED =9600 8 
1636 :CHARACTER LENGTH = 8 BITS 
‘1837 O08220 012777 000001 o03404 MOV #1, IDHBAR ‘SET BAR BIT FOR LINE 0 
| 1638 006226 005777 9003400 1S: TST JDHBAR WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
| 1638 006232 001375 BNE 1$ 
1640 006234 105777 003360 TSTB aDHSCR ;WERE ANY CHARACTERS RECEIVED 
| 1641 006240 100001 BPL 2$ 
| 1642 O06242 194002 HLT 2 ;RECEIVER NOT BLINDED, ERROR 
| 1643 006244 104406 2S: SCOPE :CHECK FOR ITERATIONS. LOOP 
1645 ;SET HALF DUPLEX ON LINE 1 
| 1646 : TRANSMITI A BINARY COUNT PATTERN 
| 164? :VERIFY THAT NO CHARACTERS ARE RECEIVED 
1649 O0624%6 012767 OO0034O 171522 122: MOV #340, PS ;DISABLE ALL INTERRUPTS 
1650 006254 012767 000020 903404 MOV #20, [COUNT :SET UP FOR 20 ITERATIONS 
1651 O06262 O1c767 006356 003372 MOV #2$ ESCAPE SET TO NEXT TEST 
1652 0040 322 MOV #81TI1, JDHSCR :MASTER CLEAR INTERF 
006276 004767 O03424 PC, CLRALL CLE TE COUNT 
1654 : AND ADDRESS MEMORY LOCATIONS 
1655 0 012777 000001 003310 : SELECT 
656 006310 012777 011754 003310 MOV #TBUF , JDHBA :SET UP TO TRANSMIT 
1657 006316 012777 177400 003304 MOV #-400' JDHBC 100 (OCTAL) CHARACTERS 
| 1658 006324 012777 073503 003272 MOV #73503, JDHLPR S R BLIND 


RECEI 
1659 ;LINE SPEED =9600 BAUD 





(moses eee ee eee 
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| OZDHI MACY11 27(1006) 29-SEP-76 14:44 PAGE 37 SEG 0036 


| DZDHIC.P11 29-SEP-76 14:42 
| 1660 “CHARACTER LENGTH = @ BITS 
if61 006332 012777 ocOD0002 003272 MOV 82, JDHBAR :SET BAR BIT FOR LINE 1 
1662 006340 905777 003266 1S: TST JDHBAR :WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
1663 006344 001375 BNE 1$ 
1664 O06346 105777 o03246 TSTB § JDHSCR ;WERE ANY CHARACTERS RECEIVED 
| 1peP SpE Sea rare th, 55 ;RECEIVER NOT BLINDED, ERROR 
| IEE? Ape see atic 23: CE OPE :CHECK FOR ITERATIONS: LOOP 
1663 ;SET HALF DUPLEX ON LINE an 
1670 : TRANSMITI A BINARY COUNT PATTERN 
1671 !VERIFY THAT NO CRARECTERS ane RECEIVED 
| 1673 006360 012767 O0034O0 171419 T23: MOV #340,PS ABLE ALL INTERRUPTS 
ig74 O06 012767 900020 bose72 MOV $30. tcOUNT Ea op FO re nest ions 
| 1675 006374 012767 006470 MOV #2$ ESCAPE TEST 
_  67— OO06402 012777 OD4000 eS MOV sitll JDHSCR ‘RASTER OLENR INT ace 
1677 OO6410 004767 O033le2 ISR PC, CLRALL :CLEAR ALL BYTE CBUNT AND 
_ 17g : AND Bus ADDRESS MEMORY LOCPTIONS 
| 1873 006414 012777 Q00002 003176 MOV #2, IDHSCR ; SELEC LINE 2 
| 1eBr Qbesa0 bleere teeaco poste NOV tc OHBC 350 CO TAL) CHARACTERS 
/ 1682 006436 012777 eve 3160 MOV 73008 SOHLPR 0) ue 
‘1683 ae Roebo NBaup 
«684 ‘AORAC TER LENGTH = 8 BITS 
| 1685 OO6%44 012777 OD00004 003160 MOV #4, JOHBAR :SET BAR BIT FOR LINE 2 
 -18B6 O064S2 095777 003154 1$: TST JOHBAR WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
1687 O06456 001375 BNE 1$ 
1688 OO&6460 105777 003134 TSTB § JDHSCR ;WERE ANY CHARACTERS RECEIVED 
1689 OO6464 10000) BPL 2$ 
| 1690 OOB466 104002 HLT 2 :RECEIVER NOT BLINDED, ERROR 
1631 006470 104400 2s: SCOPE :CHECK FOR ITERATIONS; LOOP 
1693 ;SET HALF DUPLEX ON LINE a 
1694 : TRANSMITI A BINARY COUNT PATTERN 
| 1635 :VERIFY THAT NO CHARACTERS ARE RECEIVED 
| 1697 O06472 012767 OO0D34O 171276 T24: MOV ;DISABLE ALL INTERRUPTS 
1698 O06500 012767 po0e¢ 3160 MOV 130. vfeouyr :SET UP FOR 20 TERATIONS 
1698 O06506 012767 O066 3146 MOV #2$ ESCAPE :SET UP TO ES TO NEXT TEST 
1700 006514 012777 OO4000 003076 MOV sett JDHSCR :MASTER CLEAR INTERFACE 
1701 O06522 004767 003200 JSR CLRALL “CLEAR ALL BYTE COUNT A 
708 O06S26 012777 O00003 003064 MOV JDHSCR i eLECT gb beecrenbeeutioe: 
1704 534 Ol o1i7s4 003064 MOV a JOHBA :SET UP 3 RANSMIT 
1705 Eye Bt S995 177400 003060 MOV #-400' JDHBC "400 (OCTAL) CHARACTERS 
_ 1706 O06550 012777 073503 9003046 MOV #73503, JOHLPR :SET RECEIVER BLIND 
1707 ;LINE SPEED =9600 BAUD 
17 ; CHARA TER ENGTH = gITs 
1708 OO065S6 012777 OD00!0 oD03046 MOV #10, JDHBAR ‘SET BAR BIT FOR L 
1710 O06564 005777 903042 1S: TST JDHBAR *WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
1711 006570 O01 BNE 1$ 
1712 006572 105 003022 TSTB aDHSCR ;WERE ANY CHARACTERS RECEIVED 
1713 006576 100001 BPL 2$ 
- 1714 O06600 104002 HLT 2 ;RECEIVER NOT BLINDED, ERROR 


1715 O0660e 104400 es: SCOPE ;CHECK FOR ITERATIONS, LOOP 
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] 
| Bo4 
| SMT _MACYLI 2208) 29-SEP-7E 14:44 PAGE 3e SES 0037 
| S2Dxie. P11 oe 2% 18:42 | 
736 
SES a? :SET HALF DUPLEX ON LINE 4 
' 718 : TRANSMITI R BINARY COUNT PATTERN 
ce [VERIFY THAT NO CHARACTERS ARE RECEIVED 
| {781 O06604 C1276? OOOO 171164 T2S: MOV 8340, PS :ELSAELE ALL INTERRUPTS 
| ree SoebiE 12767 a MOV + T :SET UP FOR TERATI 
7 Gt TE? "is 34 MOV sSET UP TOE TO xT TEST 
7o4 O06b26 Bler?? OO4000 Ode7e4 MOV sSItil aOHsce :MASTER CLEAR I ACE 
| 2785 006634 OO47E7 003066 JSR ,CLRAL CLEAR ALL T_AND 
| 173? 40 012777 go2752 NOV og R awit 
728 pest Sle777? (11754 O027Se MOV sTBUF, :SET UP #2 IT 
7e3 Ole777. 17 002756 MOV -409 C : (OC 
| : 006662 012777 573803 Od0e7s MOV 873503, JDHLPR SET RECEIVER 
JS , 
| 


002734 MOV :SET_ BAR BIT LINE & 
SSeees i$: TST seuaae ;WAIT FOR P RHARAC TERS TO BE TRANSMITTED 


;WERE ANY CHARACTERS RECEIVED 
;RECE! NOT BLINDED, ERROR 


Bs 
q 


O20 9-9 I 
~ 


SSultetattehs 
ae 
5 
iF 
FE 
OE 
& 
ps) 


006715 2s: SCOPE ‘CHECK FOR ITERATIONS. LOOP 

| Tm SE DUPLEX ON LINE 5 

1742 : TRANSMITI A BINARY COUNT PATTERN 

1733 :VERIFY THAT NO CHARACTERS ARE RECEIVED 

1745 OOE716 012767 OO034O 171052 Tes: MoV #340, PS ;DISABLE ALL INTERRUPTS 

174 05 Sie7&7? 000020 902734 MOV , LCOUNT :SET UP FOR 20 ITERATIONS 

1747 732 Sie7er 007026 MOV #23'ES :SET UP TO ESCAPE TO NEXT TEST 

1748 006740 612777 Bowne = MOV #5111. 3DHSCR :MASTER CLEAR INTERFACE 

1749 06746 004767 754 ISR vk ?CLEAR ALL BYTE COUNT 

i5ey DoeTS2 012777 ooz640 MOV #5, BDHSCR Og aA” @ palmetto tame 

ie ee fee Hie Bee = ee 35) Uocta | Sater 

i7eq Bpessé 512777 hoe Bases: MOV S GDHLPR : og RECETVER BLIND 

1755 :L SPEED 29650 BAUD 

1756 Hq T LENGTH = 2 BITS 

i 007002 912777 002622 MOV #40, JDHBAR ;SET BOR SIT FOR INE 5 

175 307016 005777 002616 1S: TST JOHBAR *WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 

1760 105777 002576 TSTB  SOHSCR sWERE ANY CHARACTERS RECEIVED 

176i Boones oar BPL 

1762 007024 104002 HLT 2 sRECEIVER NOT BLINDED, ERROR 

i763 007026 104400 2s: SCOPE “CHECK FOR ITERATIONS, LOOP 

1765 :SET HALF DUPLEX ON LINE & 

i766 : TRANSMITI A BINARY ESUNT PATTERN 

i767 VERIFY THAT NO CHARACTERS ARE RECEIVED 

1769 12767 DO0340 170740 Te7: ‘MOV LE ALL INTERRUPTS 

1770 bi 55E9 000020 hoses MOY $20, 3e te Sunr i DISAB. IP FOR 20 ITERATIONS 

177i 007044 012767 007140 O0e610 MOV 82S ESCAPE :SET UP TO ESCAPE TO NEXT TEST 








ca ee ae ee ee 


CO4 


DIDMI MACYLL 27(100S) 29-SEP-76 14:44 PAGE 39 Seo 203 
STOMTC.P 11 28-dbo% 14:4 . 
irre o070Se2 parr 904000 002540 pH SEITLL, SOHSCR s MASTER Re atie! < 
if ¢ C,cl ’ 
iste Sous —_ ¥ iShEME BB TT cartons 
1775 007064 01 g0000¢ oo2s2¢ MOV #6, JDHSCR : sevecy INE & 
1776 3 Luvs Queset MOV - aTBUF , JOHBA ;5ET UP TO TRANSMIT 
i777 O07] le Pee 00 02S22 MOV 8-400 JDHBC "400 (OCTAL) CHARAC 
reat: 007106 O01 002510 MOV 872503, JOHLPR ise PECE VER BLI 
1 3b NE pred ; 
Zee 114 002510 MOV 8100, JOHBAR : SET Bee Er Per L I : Se 
178 pet 777 Base na 18: TST sCHBAR WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
1 007126 001375 one 1$ 
i783 352130 i 777 002464 TSTs SDHSCR :WERE ANY CHARACTERS RECEIVED 
ice Sige tee i ;RECEIVER NOT BLINDED, ERROR 
1752 007140 104400 2s: COPE :CHECK FOR ITERATIONS, LOOP 
tes LINE.7 
1 Eee rr OFF NAR EQUNT PATTERN 
173) :VERIFY THAT NO NCHARECTERS ARE RECEIVED 
ios 007142 012767 000340 170626 130: MOV 8340,PS : DISABLE ALL INTERRUPTS 
in 907180 312767 900029 002510 Mov 820, Ecount Ea UP FOR 20 ITERAT! LS cont 
ine 55126 £ig2s? atta HOV tI1, 3DHSCR RRSTER INFERS ACE 
1787 007172 604767 002530 ISR PC, CLRALL Mace BYTE COUNT AND 
i aCe Bus ADDRESS MEMORY LOCATIONS 
l 007178 012777 000007 9002414 MOV #7, OHSCR :SELECT LI 
1800 007204 012777 9011754 4 MOV 8TSUF , JDHBA :SET UP TO TRANSMIT 
180: O072l2 912777 35480 002410 MO 8-400' JDHBC :400 (OCTAL) CHARACTERS 
180 007220 912777 002276 MOV 873503, SOHLPR :SET RECEIVER BLIND 
1 : :LINE SPEED =600 8 BAUD 
1804 Te TER LENGTH = 8 grTs 
1860S 007226 012777 oO00200 002276 MOV 8200, IDHBAR SET BAR BIT FOR LINE 7 
180 007234 eel 002372 18: qsI SHEAR WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
a 8 vu 
1808 007242 105777 o0e2se TSTB  SDHSCR ;WERE ANY CHARACTERS RECEIVED 
1608 07246 190001 BPL 23 
1810 O007250 104002 HLT 2 ;RECEIVER NOT BLINDED, ERROR 
1g11 007252 104400 23: SCOPE :CHECK FOR ITERATIONS, LOOP 
e 
1813 :$ET F DUPLEX ON LINE 19, 
i814 PhaNcntT A BINARY EOuNT PA TTERN 
igis :VERIFY THAT NO CHARACTERS ARE RECEIVED 
4 1 1 14 l: MOV e324 L 
iB: 007254 012767 000340 170514 13 340, PS :DISABLE AL INTERRUPTS 
1E18 5 12767 000020 902376 MOV #20, [COUNT :SET UP FOR 20 ITERATIONS 
1818 6072 12767 007264 002364 MOV #o$ ESCAPE :SET UP TO ESCAPE TO NEXT TEST 
1820 0907 12777 904000 002314 MOV #8ITI1. JDHSCR s HAs ASTER CL CLEAR BR INTERES ACE 
1821 007 767 002416 ISR PC, CLRALL T AND 
ieee EN Bus SDBRESS MEMORY LOCATIONS 
1823 007310 012777 000010 MOV #10 jBOHSCR :SELECT LINE 10 
iges 00731€ 318777 011754 Noy : iSET Up 10, TRANSMIT 
tee 315555 75059 ae MOV re Soe icp? CEIVER BLI 
1827 :LINE SPEED =9600 BAUD 
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Pll  29-SEP-7 
A : CHARECTER LENGTH = 8 SITS 
O07340 O12e777 OO04OO o0e264 MOV 8400, JOHBAR ;SET BAR BIT FOR LINE 10 
sori eee 002260 1S: is! SHEAR :WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
007364 105777 02240 i378 DDHSCR ;WERE ANY CHARACTERS RECEIVED 
007360 100001 2$ 
7362 104008 HLT 2 ;RECEIVER NOT BLINDED, ERROR 
Basses l 23: SCOPE :CHECK FOR ITERATIONS; LOOP 
:SET HALF DUPLEX ON LINE 
; TRANSMIT A BINARY COUNT PATTERN 
!VERIFY THAT NO CHARACTERS ARE RECEIVED 
012767 000340 170402 T32: #340, PS DISABLE ALL INTERRUPTS 
sorars Cle7b? S002) Socees MOV #20, COUNT :SET UP FOR 20 IT ‘ 
O07402 013767 O07476 MOV 82$ ESCAPE :SET UP TO ESCAPE TO NEXT TEST 
007415 012777 904000 Odd2e0e MOV s8It11. ADHSCR :MASTER CLEAR INTERF 
007416 004767 002304 J PC, CLRALL ‘CLEAR ALL BYTE COUNT AND 
o07422 O1 002170 MOV 11, 3DHSCR 3a BS AE ve sh 
3 ; 
007430 6 ee ef oe 4 902170 MOV sTBUF , JDHBA :SET UP TO TRANSMIT 
007436 012777 17 002164 MOV 8-400 SDHBC #400 (OCTAL) CHARACTERS 
007444 012777 673803 o0215e2 MOV 873503, JDHLPR :SET RECEIVER BLIND 
‘LINE SPEED =9600 BAUD 
: CHARACTER LENGTH = 8 BITS 
oo74S2 012777 001000 o0e1Se MOV #1000, 2DHBAR :SET BAR BIT FOR LINE 1 
007460 005777 O62146 1S: TST JOHBAR {WAIT FOR ALL SHARACTERS TO BE TRANSMITTED 
007464 901375 BNE 1§ 
OO74EE 1 002126 TSTB  SDHSCR ;WERE ANY CHARACTERS RECEIVED 
007472 10000: BPL 23 
097474 104002 HLT 2 :RECEIVER NOT BLINDED, ERROR 
007476 104400 2s: SCOPE :CHECK FOR FTERATIONS, LOOP 
;SET HALF DUPLEX ON LINE 12 
: TRANSMITI A BINARY COUNT PATTERN 
*VERIFY THAT NO CHARACTERS ARE RECEIVED 
007500 012767 000340 170270 133: MOV ;DISABLE ALL INTERRUPTS 
007506 012767 000020 Ooecise MOV 120. debut :SET UP FOR 20 ITERATIONS 
007514 612767 007610 902140 MOV ESCAPE :SET UP TO ESCAPE TO NEXT TEST 
007522 012777 004000 002070 MOV sartii JDHSCR :MASTER CLEAR INTERFACE 
007530 004767 002172 JSR PC, CLRALL !CLEAR ALL BYTE COUNT AND 
"AND BUS ADDRESS MEMORY LOCATIONS 
007534 012777 o00012 o020Se MOV #12, IDHSCR ‘SELECT LINE 12 
007542 012777 011754 d02056 MOV sTBUF , JDHBA :SET UP TO TRANSMIT 
007550 012777 177400 O020S2 MOV #-400' 3DHBC '400 (OCTAL) CHARACTERS 
007556 012777 673503 902040 MOV #73503, JOHLPR :SET RECEIVER BLIND 
:LINE SPEED =9600 BAUD 
:CHARACTER LENGTH = 8 BITS 
007564 012777 oO02000 oco2040 MOV #2000, 2DHBAR SET BAR BIT FOR LINE le 
007572 005777 O0c034 18: TST JOHBAR WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
097576 001375 BNE 1$ 
106777 002014 7STB  adOHSCR sWERE ANY CHARACTERS RECEIVED 
007604 100001 BPL 23 
007606 104002 HLT 2 :RECEIVER NOT BLINDED, ERROR 


007610 104400 es: SCOPE :CHECK FOR ITERATIONS, LOOP 


C.Pll 23-SEP-76 14:42 


Pirie iiriaiisicer ate pets ttt cL 
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TeewcHTy EP haa: at IB ATTERN 


VERIFY That NO CHAREC TERS ARE RECEIVED 


? Ss& 134: V NT BRUPTS 
Sele GT RE SB PGE PT 
Ore ee panels 001756 Noy s6itT] SDHSCR ip TER Pg ACH 
be ro bet ¥ ADDRESS COENORY VOCATIONS 
po7e6 12777 900013 ran NOV #13, SOHSCR ey ie 13 : 
es 
pee pietee Obhiae BbiSad y  BTEAE SpteC Te ectaL) TRS A CTERS 
70 Ole777 873503 001726 MOV 873503, JDHLPR :SET RECEIVER LIND 
007676 012777 004000 001726 MOV #4000, JDHBAR a BeR BIT IT FOR RLINE 1 ers 
907704 005777 001722 1S: TST aDHEAR WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
Borie ioa73 001702 iste SHSCR ae ANY CHARACTERS RECEIVED 
BS 20 ravine HLT 2 ;RECEIVER NOT BLINDED, ERROR 
perres ard 2s: SCOPE :CHECK FOR ITERATIONS, LOOP 
:SET HALF DUPLEX ON LINE 14 
; TRANSMIT A BINARY COUNT PATTERN 
“VERIFY THAT NO CHARACTERS ARE RECEIVED 
Be, Oe Tes Ba ORE ek od T TERATIONS 
es 5} ? Steer Bot ees MOV 0, Lcount :SET UP TO eet TO NEXT TEST 
012777 i644 MOV #8I1T11, JDHSCR *MASTER CLEAR IN RACE 
007754 004767 001746 ISR ¢, CLRALL ; CLEAR E ou 1 BND TIONS 
007760 012777 14 001832 MOV #14, IDHSCR :SELECT LINE 14 . 
012777 011754 OO1&3e MOV aTBOF , aDHER : T IT 
012777 177400 O01626 MOV JDHBC "400 (OCTAL) CHARACTERS 
010002 012777 073503 OO1614 MOV 173503. DOHLPR ise Te RECEIVER fh ih 
010010 012777 010000 001614 MOV 10000, JDHBAR PROGR SIT FOR L ine id as 
t , 
010016 905777 001610 1S: TS SHEAR WAIT FOR ALL SRARAC TERS TO BE TRANSMITTED 
Gisaes 10873 001570 AL SDHSCR WERE ANY CHARACTERS RECEIVED 
9: 0636 19400 HLT 2 ;RECEIVER NOT BLINDED ERROR 
10034 j 2S: SCOPE !CHECK FOR ITERATIONS; LOOP 
HALF DUPLEX ON LINE 


; SET 1S 
;TRANSMITI A BINARY COUNT PATTERN 
:VERIFY THAT NO CHARACTERS ARE RECEIVED 


010036 O12e767 O00340 167732 T3t: MOV +OISAeLS ALL go ae 
010044 012767 000020 001614 MOV $20. OOunT ;SET UP FOR 20 ITERATIONS 
010052 012767 O10146 001602 MOV 82S, ESCAPE ;SET UP TO ESCAPE TO NEXT TEST 
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| DIDHI MACYLL 27(1008) 29-SEP-76 14:44 PAGE 42 SES 204: 
| OZDHIC.P11 29-SEP-76 14:42 © 
| 3940 010060 012777 904000 901532 MOV 8BIT11, IDHSCR :MASTER CLEAR INTERFACE 
«1941 = OL006E 767 OO1ES ISR PC, CLRALL :CLEAR ALL BYTE COUNT AND 
1H : AND RESS MEMORY LOCATIONS 
Be: 010072 012777 000015 001520 MOV #15, JDHSCR SELE I 
iS BRS Gee ie ee ere aba! 5 Goh Pea oe 
| 1 re ry 1 - 
| Je4e Beet piece ae SptEAe MOV Fo yeDs OCH PR ide RECEIVER BLIND 
| 1947 :LINE SPEED =9600 BAUD 
1948 . ‘CHARACTER LENGTH = 9 BITS 
1948 010122 012777 O20000 onD1S02 MOV #29000 , IDHBAR :SET BAR BIT FOR LINE 15 
13s 510130 905777 O01476 1S: rs! GOHEAR : WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
| i92 010136 105 001456 TSTB  aDHSCR ;WERE ANY CHARACTERS RECEIVED 
1953 010142 10000) BPL 2 
| 7954 O10144 104002 HLT 2 ;RECEIVER NOT SLINDED, ERROR 
1335 610146 104400 2s: SCOPE :CHECK FOR ITERATIONS; LOOP 
363 SET HALF DUPLEX ON LINE 16, 
1958 : TRANSMITI A BINARY COUNT PATTERN 
1$3 “VERIFY THAT NO CHARACTERS ARE RECEIVED 
| 1961 010150 012767 000340 167620 137: MOV #340, PS : DISABLE ALL INTERRUPTS 
192 010156 g00020 001502 MOV #20), LCOUNT >SET UP FOR 20 ITERATIONS 
| 1963 O10164 012767 019260 9001476 MOV #23, ESCAPE 67 Up 10 ES TO NEXT TEST 
| 3964 ‘910172 60 001420 MOV #8It11, JDHSCR TER CLEAR INTER 
| 1965 010200 OO047&7 901522 ISR PC, CLRALL CLEAR BYTE COUNT AND 
ises 019204 012777 16 OO1406 v 1b R 0 Bus ones —- 
s ; 
1366 010212 012777 011754 001406 MOV sTBUr, eeyf te LINE ey 
1968 010220 912777 177400 001402 MOV #-400' JDHBC *400 (OCTAL) CHARACT 
1370, 010226 012777 073503 001376 MOV 873503, IDHLPR SET RECEIVER BLIND 
| 4972 ;CHARACTER LENGTH = 8 BITS 
1973 010234 012777 oO40000 001370 MOY #40000, JDHBAR $551 Ben BF FOR ALINE 15 
1974 O1024e 777 001364 1S: TST aOHBAR WAIT FOR ALL CHARACTERS TO BE TRANSMITTED 
1975 O1024€ 001375 BNE 1$ 
1978 915256 1 001344 Ste SOHSCR saan eset eoananions RECEIVED 
fe. 10254 160001 i 
1978 O1025_ 104002 HLT 2 :RECEIVER NOT BLINDED, ERROR 
1973 010260 104400 23: SCOPE :CHECK FOR ITERATIONS. LOOP 
; 
1961 :SET HALF DUPLEX ON LINE 1 
i992 : TRANSMITI A BINARY tae TTERN 
1383 :VERIFY THAT NO CHARACTERS ARE RECEIVED 
1985 O10262 012767 O0034O 167506 THO: MOV #340, PS sDISABLE ALL INTERRUPTS 
[667 Bibere Bisse? Siosse porase Ry ae), IcounT Pa 
1aEz bt bs7e 15585 eet Bot sae MOV teeth JDHSCR :MASTER CLEAR I ape 10h 
1989 010312 004767 001410 ISR PC, CLRALL CLEAR ALL L BYTE COUNT AND 
1990 AND BUS ADDRESS MEMORY LOCATIONS 
1991 910316 012777 : 1? 901274 NOV #1? QDHSCR sSELECT LINE 1? ee 
NN ; RANSM 
1235 3iB363 fl 777 tea 001270 8-400 Bat :490 (OCTAL) CHARACTERS 
/ 1994 010346 012777 073503 O01256 MOV #73503, JDHLPR -SET RECEIVER BLI 
«49s ‘LINE SPEED =9600 BAUD 
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;CHARACTER LENGTH = 8 & a'3 


01034 012777 100000 odl1es6 MOV #199000, JOHBAR :SET BAR BIT FOR LINE 1 

010364 005777 O0i2s2 1$: TST tWAIT FOR ALL SRARACTERS TO BE TRANSMITTED 
RiBSeS RLEZS oor eae #e tes WERE ANY CHARACTERS RECEIVED 

010366 105001 art ; 

RiBSs2  tBuSeE 2s: STORE tar ‘ Ba Tezat tone: ERS PRSe 


cc.-hUh rer - "= 


OZOH] MACY11 27(1006) 29-SEP-76 14:44 PAGE 44 
OZDHIC.P1l 29-SEP-76 14:42 

















i 
| 2004 
2005 
| 2006 sEND OF PASS 
| 2007 : TYPE NAME OF TEST 
2008 “UPDATE PASS COUNT 
:CHECK FOR EXIT TO ACT-11 
10 “RESTART TEST 
we 
2012 910374 104401 EOP: TYPE :TYPE NAME OF TEST 
Sat iets ath 901312 AR AST CLEAR LAST ERROR PC 
15 010404 > §0124 LR ERED :CLEAR ERROR FLAG 
Eats states BReoES isis fhe Roche :UPDATE PASS COUNT 
«BZ GIONS Ole?er oleay le7i46 ROY PRSCNT LIGHTS :DISPLAY PASS COUNT 
| 2018 O104e6 apts BEQ oFee :IF NOT, CONTINUE TESTING 
2020 010430 900005 RESET 
2021 O10432 004711 LOGICAL: ISR PC, (RL) 
| BO22 O10434 900240 NOP 
2023 010436 000240 NOP 
2024 O10440 00540 NOP 
202s O10442 000167 170534 RESTRT: JMP BEGIN 
| 027 ;CHECK FOR LOOP ON CURRENT TEST 
| B0e8 CHECK FOR ITERATION SUPPRESSION 
| etes 
2030 O1O44& 032767 002000 167114 SCOPER: BIT #SW10, SWR 
2031 O104S4 901030 BNE 4 
20s O1045 032767 OY0D00 167104 1S: BIT #SW14, SWR 
2033 O10464 001021 BNE 33 
2034 O10466 ? 904000 167074 BIT #SW11,SWR 
/ pO3S O10474 001006 BNE ro} 
«ERS Blocos Gsese> BOTIES colsse iyS OLBENT, ICOUNT 
2038 010510 001007 BNE 55 , 
2038 010512 O05067 o0115e 2s: CLR LPCNT 
2040 010516 005067 001130 CLR ERRFLG 
| 2041 010522 011667 601132 MOV (SP), RETURN 
2042 010526 o0000e2 RTI 
2043 010530 O1E716 001124 3S: MOV RETURN, (SP) 
| po44 010534 900002 RTI 
eps 910536 005767 001110 4S: TSI ERRFLG 
10542 001745 BEQ 1$ 
2047 O10S44 2g 
2048 ;CHECK FOR FREEZE ON CURRENT DATA 
| 6051 g1osHe 7? O01000 167014 SCOPIR: BIT #SW09, SWR 
shez Giese aeree Beg 
2053 O10556 O1E716 oOO0110e MOV FREEZ1, (SP) 
2054 O10Ste o00002 1S: RTI 


————— 





DZDHI MACYL] 27(1008) 29-SEP-76 14:44 PAGE 4S SEG CO44 
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2055 
2056 sERROR HANDLER 
10564 032767 O20000 166776 ERRORS: BIT #SW13, SWR 
Spee ot 001051 ONE HALTS 
| e060 g10574 21667 001116 cH (SP), LAST 
2062 plese O11667 001110 MOV (SP), LAST 
2063 10606 005067 001040 CLR ERRFLG 
2064 010812 104406 18: SAVOSP 
2065 O10614 011605 MOV (SP). RS 
epee 010616 162708 pov002 sug #2,R5 
| 1 115 MOV (RS) RY 
20688 010624 006304 ASL RY 
2063 010626 006304 ASL 
2070 010630 O42704 177001 BIC #177001,R4 
2071 O10634 O62704 613152 ADD #ERRTAB! RY 
| pO72 O10640 012467 000034 MOV (R4)+, ERRMSG 
2073 91064 467 900042 MOV (R4) , DATABP 
2074 010650 ? 000776 TST ERRFLG 
2075 010654 001403 TYPMSG 
| 2076 010656 767 000030 TST DATABP 
| 2077 010662 001007 BNE TYPDAT 
| p078 O10S64 104402 TYPMSG: OCTASC 
2079 O10666 010760 ERTABO 
| 2080 010670 012767 000001 000754 MOV #1, ERRFLG 
| e081 010676 104401 se TYPE 
Shea Boe7e7 ooooo4 eBoST: at DATABP 
2084 010706 O00! BEQ RESREG 
| pO8S O10710 104402 OCTASC 
2086 010712 o00000 DATABP: 0 
| 2087 g107i4 07 RESREG: RESOS 
| g088 O10716 7 166646 HALTS: T SWR 
| 088 010722 BPL EXITER 
| 2990 010724 010046 PUSHRO 
«p08 ~=010726 pooo02 MOV 2(SP),RO 
| 2032 010732 HALT 
2093 010734 O12600 POPRO 
+2084 010736 767 000714 EXITER: INC ERRCNT 
| p095 O10742 032767 O02000 166620 BIT $SW10,SWR 
gOS 010750 o01402 BEQ 
| 2097 010752 016716 000704 MOV ESCAPE, (SP) 
«p08 010756 ood00e2 1S: RTI 
2099 010760 xo0000! ERTABO: 1 
2100 01076e 02 BYTE 6,2 
2101 010764 011710 SAVPC 


| 
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aE 


SRARZORE BSG VRRPORE Sw own coe BBIRRLOW OT 


; TRAP pr Perey RERVICE 

OF TRAP _IS EXTRACTED 
AND EEL AS OFFSET TO OBTAIN POINTER 
:T0 SELECTED SUBROUTINE 


! TRPSRV: MOV ~ ),-(SP) GET PC OF RETURN 
red ee Ste ooo002 SUB (SP) 3 oF Peak 
10774 017616 000000 cans HOV Fu! (SP) GET RP ‘nen . 
sspears ROSstP 177001 : hie (ay (SP) tu UNWANTED ober g 
age Sie Bane ar hcom ‘quite apes oO 
siaeaage ; 
011016 000136 IMP asp) :GO TO SUBROUTINE 


;SAVE PC OF TEST THAT FAILED AND RO-RS 
011020 016667 900004 O0066e SVOSP: MOV 4(SP) , SAVPC 


cc eee 


rurorurururururorururururororu rurururorururufrorurufororu furururururururu 
0 Ob be Be bs be 8 Be be he he bn be Be Be be Be ae be be he Be he he he Pee Be bbe Be be Be pe be 


;SAVE RO-RS 
01 O10S&7 oO00ES2 SvOS: MOV RS, SAVRS 
011032 919467 900644 MOV —- RY, SAVRY 
He HDs fee Gee Oe 
| 11 10167 MOY RIS SAVRI 
011052 7 000614 MOV —_— RO, SAVRO 
011056 RTI 
| ;RESTORE RO-RS 
| 11060 916700 900606 RSOS: MOV — SAVRO, RO 
| 011064 O1670i OO0604 Mov  SAVRI'RI 
| Q11070 016702 o00602 MOV AVRe; Re 
011074 016703 900600 MOY © SAVR3; RG 
| 11100 16704 900576 MOV AVRY' RY 
| 011104 016705 900574 Moy  SAVRS;RS 
| Oiilio ddo0d2 RTI 


KO4 


nee 
; 


| 
i 
' 


SEG CO46 


14:44 PAGE 47 


23-SEP-7 
7E 14:42 


29-SEP- 


MACY11_ 27( 1006) 


C.Pll 


| OZDHI 
| DZDHI 





4 
- 
om | 
oO 
a 
— 
ES 
~~ 
Oo 
= 
- 
ao 
— 
w 
on] 
onl 
oO 
Ww 
a 


_ 
3 5 
Qa Qa 
a 
- ww -— 
— =o ir] 
a. 2.2 . 
- -—wu + 
a a~-©O o ~~ 
oOo ww a Y w 
—Ur-MmeAn CH 
uw t@msnBma-~uUu 
a. 
, 2 
- 
tJ 
—4 
tal 
t- 


1§: 
es: 


Ee 


so 


77 Q004S4 


1} 


Cae] a | oe | se | oe | et oe | oe | oe) 


Qe 
a. i 
a a 
ogo enw 
% & ~32 5 
aW mw + imw a 
a~ mo Oo-r-O0 - 
wm e# 4 ie Oe. w 
~—tw th We eZ --mmMmwn z 
Ts @was(a-(3aw~ (ara tua. -+ _ 
ot aaP PRP SP yts 
Oa Save Sas Sonauss Sar 
4 uw 
Qe Q 
Are oS. 
rea = za 
tu 7 - 


mee 


aa Soe aan 


FORBRMORE, 


ee ee ee eee | 


ee 
Ban 


—tto4 
cucucucuruCuT 


ONAINMNOOOOVWOOOOOMOO0ONNM 


BOTs TS ET TF FT AMAA UNDO DDD BiB BeDR Rete 
cn han bae bam bam pam bam pam pam bam bom bam bam bam, bans hae, be bam hae, beam, boas bas bone hone, boas ba, bak bone, boas bee bos bene, bas ben bee ba 
PAPTAPTAPIAPIAPIAPLATaPlirlatlitliviatliviivlaviaviitlirlivliviivlirlaviiviaviarlavlallavliviaviarlariiviany 


c---o-eor-  -- - 














LOY 


OZDHI MACY11 27(1006) 29-SEP-76 14:44 PAGE 46 SEG 9047 
DZOHIC.P11 29-SEP-76 14:42 


| 2174 
2175 sCONVERT ASCII STRING TO OCTAL 

| 2177 01124 011605 PARAMS: MOV (SP) ,R 
178 ll 12567 900146 MOV (R + LOLI 

| 1 11254 012567 44 MOV (R5)+>HILIM 
180 O11 12567 000142 MOV (RS) +! 
2181 O11264 112567 000140 MOVB  (RS)+,LOBITS 
2182 911870 112567 000135 MOVB (RS) +. ADRCNT 
Sig iia dostoS ais Rio 
siéc Bt tS08 012704 013114 MOV #INBUF.,R4 

| 2186 011304 122714 o00015 C #15, (R4) 
2187 011310 001420 BEG PARERR 

| 2188 O11312 121427 o00060 1$: CMPB 3s CR4) , #60 
2188 011316 Ode4IS BLT PARERR 
2190 011320 121427 000067 CMPB ss (R44) , #67 
2191 011324 0o030!1e BGT 
2192 011326 142714 o00060 BICB #60, (RY) 
2193 011332 1S°40s BISB = (R4Y)+.R 

| 2194 011334 122714 00015 CMPB 815, (RY) 
2195 011340 OO140s BEQ Lint 

/ B196 011342 

| e197 O11344 006305 ASL RS 

| 2198 911346 006305 ASL RS 

| e198 011350 900760 BR é 

= e200 «011352 104404 PARERR: INSTER 

| e201 611354 000750 BR PARAM! 

| e203 ;TEST TO SEE IF NUMBER IS WITHIN LIMITS 

| e205 011356 o20567 oDD04e LIMITS: CMP RS, HILIM 

| p206 011362 101373 BHI PARERR 

| 2207 011364 020567 o00032 CNP RS ,LOLIM 

Bt 1358 eee 000032 Bee PoeTTS. RS 

| gei6 011376 001365 BNE PARERR 

ele :STORE NUMBER AT SPECIFIED ADDRESS 

| 2214 O11400 016704 oD0022 MOV DEVADR, R4 
2215 OL1404 O1 1$: MOV RS, (R4S+ 

/ B21E OL1406 062705 ooD00e ADD #2;RS 

| 2217 O11412 105367 000013 DECB  ADRCNT 

| 2218 O11416 001372 BNE 1$ 
2219 011420 RTI 

| p20 O11422 oo0000 LOLIM: 9 . 

| 2221 011424 900000 HILIM: O 

«eee 4011426 900000 DEVADR: 0 

 pe23 011430 900000 LOBITS: O 
2224 011431 ADRCNT=LOBITS+1 
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;CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 


OCTASN: TYPE 
MCRLF 


MOV a(SP),R1 

ADD #2, (SP) 

MOV (RL)+, WRDOCNT 
1S: MOVB - (R1) +, CHRCNT 


2s: MOV BINWRD; RY 
MOVB = CHRC 
MOV #TEMP, RO 
3 MOV 4 RB 
BIC #177770,R3 
ADD #260, R3 
MOVB 3, (RO)+ 
ASR RY 
ASR RY 
ASR RY 
DEC RS 
BNE 33 
MOV #MDATA,R3 
4g: MOVB -(RO),(R3)+ 
DECB = CHRCNT 
BNE 4§ 
TSTB = SPACNT 
BEQ t 
cs: MOVB «#240, (R3)+ 
DECB = SPACNT 
BNE cs 
6S: CLRB ss (R33) 
TYPE 
MDATA 
DEC WROCNT 
BNE 1$ 
RTI 
WRDCNT: 0 


CHRCNT: 0 
SPACNT=CHRCNT+1 
BINWRD: O 
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LAST: 
ENDFLG: 
NULL: 
LINACT: 
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; INDIRECT POINTERS 


;PROGRAM VARIABLES 


;ERROR FLAG 
PASS COUNT 
ERROR COUNT 
s SCORE apg on the A. TEST LOOPING 


:DATA or 
EAS Ng RETURN aODEE Hess 
i a F'n THIS T 

ie & Sees VE aREr 

Ru ave AREA 

RS SAVE AREA 

: STACK ap SAVE AREA 

: CALL ING ROUTINE SAS AREA 

; PROGRAM INTTIALIZATIUN FLAG 

*PROGRAM START FLAG 
:LAST ERROR PC 


OOOO DBOOOOOOOKSOOKVOOKOV000 = OOVKOOOOOVOO0OO0ND 








BOS 


:CLEAR ALL BYTE COUNT AND BUS ADDRESS REGISTERS 


) Sp Aaa at ee tt tt 
PRI) ta tet ct tetetatctatatetatatitattot thet ttt CTT 
OOw a ES ET = a ee ed Se a ed a Se Se ek ee a a ae a ee ae 
5 
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ae Blane dyad eo cade da ane tnt cnGch Ga a Ganeae ea Ga eréaca ca Gcacrerca G erence caer cs 
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Du ded dud au MuCUeaoe SUMS SCR Tt titi RRR CERIN Te 


oe ee Ree ee ee ee ee ee ee ee ee ee ee ee ee eee ee ere eee 
San lec etl beth Seam Jee et et peat. pat hath bet peek nt ea ete beth ame et aes, bam, hes ees haem. bas bas ban ban ban ban baw bam bam tae toe bee bie hae hae hae bee hae eae bak bees ban bas bees eam bn hae ba ba 
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an ah bee bate bem ba bth hams ban bak bees ba bas heen hae ea han bak ham baie bean eae bam bee eae bam bam hae bam hae hae eae ham bam ban bom beae tee tae eae han ban ban bam eas ban bom ban kak bee hak hats ban hae nan he 
OYNONYNOOIOOOOYIIOWIOBIVIOYIOINYVWIOYVOOOVONYOVOOOIOVNOOOOOOIOMNOMOOOOOKOOMOOOOOMOMOO 
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fun STMT NTT mucucucurued euru 
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a ae % \BYTE IDAT 
1551 ret "BYTE Tat 
13214 0 "BYTE DAT 





e481 Olzeis B41 “BYTE DAT 
evse Oleeig | BME “BYT T 
83 01 e43 “BY T 
a Ot es “BYT T 
es 12221 ‘BYTE —TDAT 
e486 012222 BME ‘BYTE DAT 
go pies? eur "BYTE TDAT 
12284 “BYT 
83 S2e25 9351 {BYTE 
ev Giceee = ee BYTE 1DAT 
. i 
Reige = ee ie 
12231 “BYTE DAT 
e484 Olee32 6 “BYTE TDAT 
eves 012633 57 “BYTE TDAT 
24% 012234 260 “BYTE — TDAT 
2 Sigs el “BYT T 
12236 TOAT 
1 263 "BYTE © TDaT 
2500 012240 89 Be4 “BYTE TDAT 
e501 1841 = ets BYTE TAT 
is Glens 6 ‘BYTE Dat 
2504 Ol2e44 270 ‘BYTE TDAT 
2505 Ol2e45 = 87] “BYTE TDAT 
2506 01246 272 "BYTE TDAT 
12247 “BYTE  TDAT 
1 74 ‘BYTE © TDAT 
12251 ‘BYTE TDAT 
2510 012252 278 ‘BYTE TDAT 
2511 012853 277 “BYTE DAT 
1g Dlgesy “BY T 
13 Oi "BYTE DAT 
15 Oi ‘BYTE — TDAT 
esis 012257 303 ‘BYTE —TDAT 
25ie Olec60 304 ‘BYTE DAT 
Sy tes ae 
1 01 csi ‘BYTE DAT 
2520 Oleee4 310 ‘BYTE TDAT 
2521 lees 311 ‘BYTE —TDAT 
plese 1 -BVTE TDA 
1 1 "BYTE DAT 
S24 Olee70 0314 "BYTE TDAT 
ese5 Olee7i Is ‘BYTE  TDAT 
er tiers | 31? ‘BYTE Dal 
e28 SigEr 350 ‘BYTE —TDAT 
ese9 Olee75 321 ‘BYTE TDAT 
2530 Olee7e 328 “BYTE —TDAT 
2531 012077 323 “BYTE —TDAT 
2532 012300 324 ‘BYTE —TDAT 
2632 012301 es BYTE TDAT 
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ess0 012334 
e561 012335 
2eS6e 012336 
2563 012337 
eS&4 012340 
esés Ole341 
est6 Ole3te 
2567 Ole343 
esee Ole344 
es63 012345 
es70 Oleo4é 
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es74¥ Ole3Se 

012383 
2s7é 
es77 012354 
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-BYTE  TDAT 
-BYT 
.BYT TDAT 
-BYTE  TDAT 
-BYTE TDAT 
.BY TDAT 
.BYT TDAT 
.BYT TDAT 
-BYTE  TDAT 
-BYTE DAT 
-BYTE TDAT 
-BYTE TDAT 
-BYTE  TDAT 
u TDAT 
.BY TDAT 
-BYTE DAT 
gu Md 
“EVIE Tat 
-BYTE DAT 
‘ TDAT 
.BY TOAT 
.BYT TDAT 
.BYT TDAT 
.BYTE TORT 
-BYTE DAT 
-BYTE TDAT 
-BYTE TODAT 
-BYTE TDAT 
ae 
‘BYE Tpat 
-BYTE TDAT 
.BYTE  TDAT 
gL TDAT 
BY TDAT 
-BYTE TDAT 
.BYT TDAT 
.BYT 
-BYTE TDAT 
-BYTE TDRT 
EVEN 
RBUF: 0 
=. +40 
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120000 RWRDO: 000 
120400 RWRO1: 120400 
121000 RWRDe: 121000 
le14 we Oh 

] 5. § 

1 : leet 
123000 RWRDE: le 
123400 RWRO?: 123400 
124000 RWRDIO: 124000 
124400 RWROI1: 124400 
ee ee ee 
1 att 1? 408 
126400 RWRDILS: ices 
127000 RWRD1E: 127000 
127400 RWRD17: 127400 
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5ei5 915225 Sipe 
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2616 OleSe& Ole60e2 
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S36 Diseus SiSce> 
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1 
012514 165314 


177166 


o0o00e 


PFAIL: 


RESTAR: 


PETAB: 


HOS 


;ENTER HERE ON POWER FAILURE 


RO,-(SP) :SAVE RO-RS ON PROCESSOR STACK 
R1:-(SP) 

Re: -(5P) 

R3,-( SP) 

Ry’ -(SP) 

RS; -(SP) 

ag -(SP) 

p’ sAYSP ;SAVE STACK POINTER 
BRESTART, 24 


;HALT ON POWER DOWN 


;PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 


2 
RETURN 


mesons eg roe 


;SET UP FOR POWER FAILURE 


ERRFLG 
LAST 
RETURN 


;SET_UP FOR POWER UP TRAP 
; NORMAL 


SEG O0SE 


wv 


ONOOVOVVOVOVOOOO OOOO VOVOOOOVVONVOON000000 - 
Ob b= bs b= Bs 0 bb be bb ee eek 


~« 
- 
~ 


JAE ROE ROR 


FRHeORNGeSRUNAR 


a8 


OOoOKOOVIO000O 
02 = b= b= f= ps ho 
WWIWIWWIG 
0—* b-+ b+ b—- &- + 
OOOKOOOON0O 
0 eae 


0+ 
mo 


Stetetatatstrtets 
FEVER ECE 


744 PAGE 58 


MTITLE: 


MVECTO: 


MEPASS: . 


MR: . 
MTSTPC: . 


- EVEN 


TRPTAB: 


-ASCIZ 


-ASCIZ 


: .ASCIZ 


-ASCIZ 


: .ASCIZ 
: .ASCIZ 


R 
SCOP1R 


105 


SEG 0057 


(15><12><12>/DH11 HALF-DUPLEX AND BREAK TEST /<15><12) 


«15><12>/VECTOR ADDRESS-/ 
(1S><12>/CONTROL REGISTER ADDRESS-/ 
/ 


?/ 
(15>< 12> 
/ POWER FAILURE, PROGRAM RESTART AT TEST IN PROGRESS/ 


«15><12>/DZDHI/ 


(15><12>/R/ 
(15><l2>/TEST PC-/ 


OF POINTERS FOR TRAP DECODING 


;BUFFESS FOR INPUT-OUTPUT 


0 
0 
0 


; TABLE 


OF POINTERS TO ERROR MESSAGES AND DATA 





cf a ee ae ee eee 








SEG 0058 
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| OZDHIC.P11 
| e691 013152 ERRTAB: 
2692 O13152 O13166 EM) 
2693 013158 013326 oT! 
2694 0131 13242 EM2 
2695 O13160 013326 571 
| Be IS Bae F 
| 2698 O13166 047515 oS2040 EMI: -ASCIZ /MORE THAN 1 CHARACTER RECEIVED/<15><12) /EXP REC/ 
2699 013174 O40510 O20116 020061 
2700 013202 944103 OS1101 041501 
2701 013210 O42524 O20i22 Oy4eS22 
2702 013216 O42503 Os3i1i Oye105 
| 5503 bis vas 3655 
| 5o0P Biss 0511 O40S0S5 020113 EM: .ASCIZ /BREAK DATA ERROR/<15><12> /ExP REC/ 
ae pt asap OSil22 051117 atts 
2709 013064 O54105 O20! nee 
2710 013272 Oo O4 000103 
2711 013300 O42522 O42503 053111 EM: .ASCIZ /RECEIVER NOT BLINDED/ 
| «=BIS O138ia Saides Suaeio Seette 
| 2714 bt 3333 042105 
| e715 013326 EVE 
| p716 013326 900002 OT1: 
2717 ~-013330 OO& oo2 .BYTE 6,2 
2718 013332 011704 SAVRS 
' 2718 013334 006 oo2 .BYTE 6.2 
2720 013336 011702 AVR 
e721 013340 900000 ENDCOD: 0 
e7ze 090001 x 


KOS 
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OZDHIC.P11 eS-SEP-76 14:42 CROSS REFERENCE TABLE -- USER SYMBOLS 
ADRCNT= 011431 2182 2217#% 22248 
BEGIN O01202 877 906 Slee e025 
Eitx = Do0Bbe “fire Sree idles «101s 11048 11908 
14S5i8 615348 1oLge ieee 16448 1668 1220 
18608 1884s 19088 19328 19568 20048 
8IT00 = 000001 S628 
BiTpy = 000002 Bat 
ate = eat z 8 
BITOY = 000020 coos 
BITOS = 000040 cses 
BITO& = 000100 5578 
BITO7 = 000200 csés 
BITOS = 000400 csse 
BITOS = 001000 csus 
BIT10 = 002000 oS38 
BIT11 = 0904000 ar ie 4 see 1385 
169s EAS ETS CiEGe «= TERE 
1772 1796 820 1844 1868 
BITle = 010000 SSls 
BIT13 = pee SS0s 
BITL4 = 04 S498 
BIT1S = 100000 S488 
CHRCNT 011604 22e33% 2237 2250% 22648 2265 
CLRALL 011726 S44 987 1030 1073 1116 
1503 1S46 15893 1629 1653 
863 1893 1917 1941 1965 
DATA = 127400 25798 
DATABP 0107le 2073% 2076 2083 208% 
DATAX = 127400 25798 25808 25818 eS82e 25838 
esSe8 4629938 8 ese 
DEVADR 011426 2180 14 e2ees 
| DEBA 011626 947% 9S6* 990# 999% 1033% 
l214# 1248% 1257% 1291% 1300% 
1506 151S# 1549 1558* 1592 
Z : 1800 i824* 1846% 18728  1896% 
DHBAR 6O11E32 9Sls# 360% 961 994* 1003% 
1132% 1133 146 * 1175 1176 
1305 1338% 1347% 1348 1381# 
1510% 1519% 1520 1S53% 1S6e% 
1685 686 1709% 710 1733% 
1830 1853# 1854 1877 1878 
1997 998 22788 
DHBC 011630 948% 957% 991% 1000*% 1034 
16138 1249% 1258% 1626% 1301 
| 101s te2e% { a lapse tears 
* £ , 3 
DHECR O11E34 959 1002% 104S* 1088 1131% 
1518 1561 1604* 22798 
DHLPR O11624 949% 9S8* 992 1001% 1035% 
l216# 1250% 1259* 1293%  1302% 
1508% 1517% 155i S60* 1594# 
| 1802 1B2b* 1850* 1874* 189% 
| DHNFC Olléee 963 10le 10S5 1098 1141 
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van uw «1 
ry 
DHRVEC O1164e2 832 2282s 
DHSC 011620 300 943% 
1072# 1075% 
le04# 8§lelet 
+ * 
tas} tedst 
l62e8% 1631 
1727% 1736 
1832 1844 
a a 
DHS 11840 # # 
ie iaie 
s 1468 = 1479 
DHSSR O11E36 903 36S 
1481 1524 
DHTL 011650 22eess 
Ree pe EE ce 
ent if 156 e622 ebSes 
EMe2 Ol3e42e 2694 27068 
EM3 013300 2696 27118 
ENDCOD 013340 53S e7els 
ENDFLG 011720 23078 
EOP 010374 e0les 
ERRCNT O11ES56 B68 2094# 
ERRFLG 011652 869# 870% 
ERRMSG 010700 2072 20828 
010564 828 2058s 
TAB 013152 2071 26918 
TABO 010760 2079 20398 
ESCAPE O11662 942% gese# 
1501 1S44% 
1867% 1891 
EXITER 010736 2089 cOS4s 
Z1 O11664 2053 22338 
TS 010716 20s93 2088s 
HILIM 011424 2179% 2205 
ICOUNT OLIE5E S41* 984x 
1500% 1543# 
1866* 1890% 
NIFLG Bii?ic Cie | bee 
iNeTER= 1 4a6 Bee 2200 
INSTR = 104403 BY44e 887 
INSTRE 011236 21708 #2674 
INSTRG O11144 21538 2673 
INSTR1 O11156 21SSe 2172 
INSTRe 011244 164 217348 
. = 900020 S328 16208 
| KX = 000020 9328 9758 
| 14918 1534s 
18608 18648 
eSese eSebe 
| LAST O1171E e0l4s 060 


1614 
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22748 


oles 
1084* 
1244# 


2040* 


9SS* 
1115* 


2045 


LOS 


2063# 


2074 


2080# 


2288s 


2b29* 


SEG CO&S 


— Ee EEE 
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LIGHTS= 177570 
Hay fli 
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_ 

- 
ONOVOVOVOVVOVOVOOONO0ND 


50 
=o 


Zc 
EE 


aR § 


+b ps 


: 
ONdNOO00-Or~ 
on 
uy 
os 


futprr tor 
roe 


12416 
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10618 
16208 
19328 
e224 


22958 


2043 


11048 
16448 
19568 


1119 


2206 


22918 


MOS 


11478 §=6©11908 12338 8 12768 
16688 16928 17168 17408 
2004s 


1162 1205 1248 1291 
2208 2210 


1026 1069% Illex 
1585 1625% 1649  1673% 
19i3% 1937%  1961% 


2631 


13198 
17648 


1334 


1198% 


13628 
17888 


1377 


1Le4ls* 
1721% 


14058 
1812s 


1420 


1284 
174S# 


SEG 9061 


14468 
18368 


1463 


1327% 
1769# 


am a re 


DZDHI MACYL1 27(1006) 
OZDHIC.P11 
RWROIS 012450 
RWRO1E O1e4S2 
RWRDI7 O124S4 
RWRD2 Ole42e 
RWRD3 Ole4e4 
RWRDY Ole42é 
RWROS pista 
RWRDE 12432 
RWRD7 912434 
SAVPC 011710 
SAVYRO 011672 
SAVR Hi tee 
=e 11676 
SAVRS 011700 
SAVRY 011702 
VRS 011704 | 
SAVSP 011706 
= 104406 
SCOPE = 104400 
OPER O10446 
COPE1= 104410 
SCOPIR O10S46 
NT= 011605 
STACK = 013540 
START 001000 
STFLG 011714 
Svos 011026 
SvOSP 011020 
SWR = 177570 
SWOO = 000001 
SWOl = 000002 
SWOe = 900004 
SWO3 = 000010 
SWO4Y = 
SWwOS = O00040 
SWOB = 000100 
SWOB = 00 
SWOS = 001000 
Sul0 = 00 
SWll = 000 
SWl2 = O01 
SWi3 = 020000 
SWi4 = 04 
SWiS = 100000 
TBUF 011754 
TOAT = OOO0400 
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roruroron 
bb = TUT 
“J 
— 


- 
tu 
<x 
ob 


2l23% 


KEES UESECES oe 


TUOPUPUTUTUTU be bb bo 0 0 
= bb PU = - OOO UT 


328 
cS938 
34 
2seis 
eSe2s 
eS838 
2584 
2seses 
eSete 
23038 
29be8 
2378 
2c38s 
2c938 
23008 2720 
23018 2718 
le 
1017 106 
toh? 1968 
1907 1931 
22e55* 22658 
913 2621 
geese 23058 
914 2030 
2095 
1042 1085 
1601 1632 
1920 1944 
23228 2323% 
533 # § 36% 
48% 49% 
23618 23628 
23748 2375% 
3878 23888 
4008 24018 


2032 


NOS 


2034 


1389 
1691 
2003 


2051 


SEQ 006 

1232 0=««27S'—iaEit 1404 1447 
iste | 1558sikeSs19B> ster? «=e 
enss «= 2088 )= 2095 
1257 1300 ©1343 «138 )=1429—Ss«1472 
1728 41752 «61778 «=: 1800S «ised = 1848 
23278 «23288 23298 23308 23318 23328 
esis 2341s 234ee 23438 2aH4e 2345s 

S3e 2354e 423558 «83568 «23578 96 2358s 
23668 23678 23688 23698 23708 23718 
23798 23808 23818 23828 22838 23848 
3924 623938 «83948 §=«239Se «239k «= 3978 
40Se 2406s 4078 2408 240%% S4i0e 
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C2DMI MAC YI1 
DIDMIC.FLL 
TE 21322 
és 011618 
"KDBR «86s 1 1éleé 
TeCSR O11614 
TPOBR 11516 
TRPOK li 
Tee tae 1 
TYPDAT O107Ce 
T tthe 
T M11) 
TYPMSG v0 
Tj 1 
719 OC33b2 
ll 003614 

| Tle DOSO4E 
13 ae 
fe Bele 
-: See 
20 005702 
13: D0E134 
T D0E47e 
T2s OOBEDs 
i 006716 
T 0070530 
001760 
T sc 
1H : 
ozs 

4 00761 
g Eee 
u ; i) 
737 610150 
v4 O0eele 
THO lobe 
ve Ooe444 
ve O0267& 
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eed = “ae a ih all oem — ed _ be ad tS ay -- io ~ at 
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24il8 24128 24138 24148 24158 eibs e4i7s 24188 24198 24208 24218 Z4228 24238 
eve4s e4eSe etches ede7e cde8s e4eSs 84308 e43l8 e438 e4338 6434s 3s8 8 e4268 
ess78 8624388 is e4tcs 38 444g O4458 C4468 24478 4428 Ss 
essos 24518 e%See 24538 24548 e45S5e e4Sés 24578 24588 e45Ss 4608 461s s 
evé2e e464s e465e e4668 24678 Se e46Se ec4708 e47is e728 24738 B474R |= B47Es 
esrés core alt o47Se ae he + one os e4ess os 8 2488s 
4238 3 8 8 8 01 
52828 5 48 sccet § . 7% $5568 523 5 ssice ceive i2s Beh Sits 
251Ss8 lés Fa t 8 ry y 8 2 8 8 2 3 
: g3i 2 $e a g is 52438 3 = sects és 78 z 52558 st508 
assis 2Ssee e438 esse 254S5e eS4és 2S478 S488 2S4Se 2550s e2csis S23 <2cSce 
ess4s cSSSe eSSés 25578 ecc&s 2659s 2ect0s ecStie ecStes eb3e ecch4e eSéSs 25s 
Fe" ees Path 70s e2S?ls eS7es 25738 274s 25758 257:8 
- o * S48 
15 8 . 
el&l 2iss 22708 
2143 2 ce7ls 
gi ie eleS# 2e7e8 
108 
1078 
2lle g2 Os 
e077 = - 20838 7 ys . 
_S8es 871 $29 2012 2081 215s 2170 2222 2258 2627 
cl4ls Bae 
C788 
S408 
le4ls8 
12648 
13278 
13708 
HY Se 
8 
iiese 
isses 
See 
1S8S8 
lé2cs 
1649s 
16738 
16978 
17218 
17458 
17&38 
lOeés 
17338 
18178 
18418 
Leese 
lees 
13138 
139378 
1%1s8 
10698 
1985s 
llles 
] 3 
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ie ° 11998 
vEC ites He S7te 
# 1 8788 
WROCNT 611602 22328 22608  e2t38 
Seis BO 
xs ] Ss 1069 10728 1112 1115s 11s5 115s 
a 2 on :* . J a » 3 Py 12878 re 13308 137 l ie 14] ise 1486 
iiss if igoée 182" ifs iscs’ Syn 1983) iege sei?) lsebe Isat 
i me ieee i E 8 t25o° ieee ters" tees 5 19408 1961 [9648 1985 [998 
9096 1 428 8 448 8 2 78 gage Ss gage 
; = 51334 : E ae £33 72 74 £35 = 93 Seg seg 
a one a a? 538 605 «60S (iDsC(iéiéCti«éiiC 
His Se om i om th 
Ed pi 5 PSE Fes bes 656 6 4 gS& 
&668 670 672 4 676 678 B80 682 ge g5 gee g%0 535 
ox 53s o3¢ sp 7 730 > 734 736 736 740 74 744 
oe 35 oe? oE8 4 75E 58 260 2b ze zee 738 ez 
772 774 776 778 780 782 7 : ie 23 
4 996 810 gle 14 gig gis 920 
oie eos eS, eel 25788 2608 2624 26658 26838 26858 26878 27158 
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BLINO} $3i8 1620 1644 1668 1é92 1716 1740 ; 1788 
| 19S6 1989 
i Sis $3¢ 975 1018 1062 1104 1147 1233 
a 1534 Rt ; 
eee $328 10 
| CODEN es4e 903 
“LT S458 $68 973 1911 1016 1054 10S9 
1269 1274 iis 1317 1355 1388 1396 
1§ 1613 16] L64e 1665 16 1714 
sa BS 1330 1964 1$78 2002 
SSETRL S318 
rRPOEF is 841 842 843 844 B45 B46 
Ts is 4 es2 1026 1069 ille i255 
iS4e 1 162 1645 1673 169 i7el 
- 1337 1961 1585 
WORDS Thy 2580 2581 2582 2583 ese4 esses 
-BUFFE 18 2675 
-CRTOH ls ces 
- ENDCO ls 272} 
-£0P ls 2005 
. ERROR is §=e0S5 
-ERRTE ls e688 
- HEADE ls 475 
. INSTR is 150 
MSG is 33 
-OCTAS ls eee 
. PARAM is 274 
-PFRIL is 2&9 
-POINT ls eet? 
- RESRE ls 2129 
- SAVRE is 2115 
- SCOPE is e0e6 
- SCOP] ls 2048 
- SETVE is Bee 
. START is es4 
. SYMBO is 496 
- TRPDE is 83 
. TRESR le 2102 
. TRETA is e&é? 
. TYPER ls 2136 
. VARIA ls 2286 


. ABS. 013242 000 

ERRORS DETECTED: 0 

CEFAULT GLOBALS GENERATED: 0 

DZDHIC. BIN, DZDHIC.SEG/CRF/SOL/DOCSUTIL2.P11,DZDHIC.P11 
RUN-TIME: {4 C 


UN-TIME: 
RUN-TIME RATIO: c21/41=5.3 
CORE USED: 11K (21 PAGES) 


DOCUMENT PAGES: 65 
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